[ruby-dev:26291] Re: ext/tk/sample/tkextlib/tile/demo.rbで TypeError

>Index: demo.rb
>===================================================================
>RCS file: /src/ruby/ext/tk/sample/tkextlib/tile/demo.rb,v
>retrieving revision 1.2
>diff -u -w -b -p -r1.2 demo.rb
>--- demo.rb	9 Apr 2005 09:27:53 -0000	1.2
>+++ demo.rb	5 Jun 2005 10:34:23 -0000
>@@ -512,6 +512,7 @@ if Tk.windowingsystem != 'x11'
>   m_file.insert(:end, :checkbutton, :label=>'Console', :underline=>5, 
>                 :variable=>$V.ref(:CONSOLE), :command=>proc{toggle_console()})
>   def toggle_console
>+    TkConsole.create
>     if TkComm.bool($V[:CONSOLE])
>       TkConsole.show
>     else

これだとメソッド呼び出しごとに作成されてしまうので、こうですね。

Index: demo.rb
===================================================================
RCS file: /src/ruby/ext/tk/sample/tkextlib/tile/demo.rb,v
retrieving revision 1.2
diff -u -w -b -p -r1.2 demo.rb
--- demo.rb	9 Apr 2005 09:27:53 -0000	1.2
+++ demo.rb	5 Jun 2005 11:38:27 -0000
@@ -130,6 +130,7 @@ end
 #	updates the scrollbar's position.
 #
 def sbstub(sb, cmd, num, units = 'units')
+  num = TkComm.number(num)
   case cmd.to_s
   when 'moveto'
     sb.set(num, num+0.5)
@@ -509,6 +510,7 @@ m_file.add(:checkbutton, :label=>'Text c
 m_file.insert(:end, :separator)
 
 if Tk.windowingsystem != 'x11'
+  TkConsole.create
   m_file.insert(:end, :checkbutton, :label=>'Console', :underline=>5, 
                 :variable=>$V.ref(:CONSOLE), :command=>proc{toggle_console()})
   def toggle_console