なかだです。

ext/tk/tkutil/tkutil.c:1.7にtypoがあります。


Index: ext/tk/tkutil/tkutil.c
===================================================================
RCS file: /cvs/ruby/src/ruby/ext/tk/tkutil/tkutil.c,v
retrieving revision 1.7
diff -U2 -p -r1.7 tkutil.c
--- ext/tk/tkutil/tkutil.c	5 Jul 2005 05:56:30 -0000	1.7
+++ ext/tk/tkutil/tkutil.c	5 Jul 2005 08:34:12 -0000
@@ -374,5 +374,5 @@ ary2list(ary, enc_flag, self)
         val = rb_apply(cTclTkLib, ID_merge_tklist, dst);
         if (TYPE(dst_enc) == T_STRING) {
-            val = rb_fun_call(cTclTkLib, ID_fromUTF8, 2, val, dst_enc);
+            val = rb_funcall(cTclTkLib, ID_fromUTF8, 2, val, dst_enc);
             rb_ivar_set(val, ID_at_enc, dst_enc);
         } else {
@@ -464,5 +464,5 @@ ary2list2(ary, enc_flag, self)
         val = rb_apply(cTclTkLib, ID_merge_tklist, dst);
         if (TYPE(dst_enc) == T_STRING) {
-            val = rb_fun_call(cTclTkLib, ID_fromUTF8, 2, val, dst_enc);
+            val = rb_funcall(cTclTkLib, ID_fromUTF8, 2, val, dst_enc);
             rb_ivar_set(val, ID_at_enc, dst_enc);
         } else {


-- 
--- 僕の前にBugはない。
--- 僕の後ろにBugはできる。
    中田 伸悦