* ext/tk/lib/tk.rb (TkConfigMethod#__confinfo_cmd,__conv_keyonly_optkeys):

make them private [ruby-dev:30074].
* ext/tk/lib/tk/txtwin_abst.rb: fix typo [ruby-dev:30073].
* ext/tk/lib/tk/canvas.rb (TkCanvas#scan_dragto): lack of an argument.
* ext/tk/lib/tk/canvas.rb: clarify the  including module name [ruby-dev:30080].
* ext/tk/lib/tk/scrollable.rb: change primary name of modules [ruby-dev:30080].
* ext/tk/lib/tkextlib/iwidgets/checkbox.rb: wrong number of arguments 
  [ruby-Bugs-7776].
* ext/tk/lib/tkextlib/iwidgets/radiobox.rb: ditto.
* ext/tk/lib/tkextlib/blt/tile/checkbutton.rb: change primary name of
  class [ruby-dev:30080].
* ext/tk/lib/tkextlib/blt/tile/radiobutton.rb: ditto.
* ext/tk/ChangeLog.tkextlib: update.
* ext/tk/lib/tkextlib/version.rb: update.


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@11577 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

ChangeLog

@@ -1,3 +1,18 @@
+Fri Jan 26 12:03:39 2007  Hidetoshi NAGAI  <nagai@ai.kyutech.ac.jp>
+
+	* ext/tk/lib/tk.rb (TkConfigMethod#__confinfo_cmd,
+	  __conv_keyonly_optkeys): make them private [ruby-dev:30074].
+
+	* ext/tk/lib/tk/txtwin_abst.rb: fix typo [ruby-dev:30073].
+
+	* ext/tk/lib/tk/canvas.rb (TkCanvas#scan_dragto): lack of an argument.
+
+	* ext/tk/lib/tk/canvas.rb: clarify the including module name
+	  [ruby-dev:30080].
+
+	* ext/tk/lib/tk/scrollable.rb: change primary name of modules
+	  [ruby-dev:30080].
+
 Fri Jan 26 07:48:57 2007  Yukihiro Matsumoto  <matz@ruby-lang.org>
 
 	* enumerator.c (enumerator_init_copy): need to copy internal

ext/tk/ChangeLog.tkextlib

@@ -1,3 +1,14 @@
+2007-01-26  Hidetoshi NAGAI  <nagai@ai.kyutech.ac.jp>
+	* ext/tk/lib/tkextlib/iwidgets/checkbox.rb: wrong number of arguments 
+	  [ruby-Bugs-7776].
+
+	* ext/tk/lib/tkextlib/iwidgets/radiobox.rb: ditto.
+
+	* ext/tk/lib/tkextlib/blt/tile/checkbutton.rb: change primary name 
+	  of class [ruby-dev:30080].
+
+	* ext/tk/lib/tkextlib/blt/tile/radiobutton.rb: ditto.
+
 2006-11-07  Hidetoshi NAGAI  <nagai@ai.kyutech.ac.jp>
 
 	* lib/tkextlib/tile/treeview.rb : minor bug fix.

ext/tk/lib/tk.rb

@@ -2829,7 +2829,7 @@ module TkConfigMethod
   def __confinfo_cmd
     __config_cmd
   end
-  private :__config_cmd
+  private :__configinfo_cmd
 
   def __configinfo_struct
     {:key=>0, :alias=>1, :db_name=>1, :db_class=>2, 
@@ -2926,6 +2926,7 @@ module TkConfigMethod
     }
     keys2
   end
+  private :__conv_keyonly_optkeys
 
   def config_hash_kv(keys, enc_mode = nil, conf = nil)
     hash_kv(__conv_keyonly_opts(keys), enc_mode, conf)
@@ -4597,7 +4598,7 @@ end
 #Tk.freeze
 
 module Tk
-  RELEASE_DATE = '2006-11-07'.freeze
+  RELEASE_DATE = '2007-01-26'.freeze
 
   autoload :AUTO_PATH,        'tk/variable'
   autoload :TCL_PACKAGE_PATH, 'tk/variable'

ext/tk/lib/tk/canvas.rb

@@ -42,7 +42,7 @@ end
 
 class TkCanvas<TkWindow
   include TkCanvasItemConfig
-  include Scrollable
+  include Tk::Scrollable
 
   TkCommandNames = ['canvas'.freeze].freeze
   WidgetClassName = 'Canvas'.freeze
@@ -543,8 +543,8 @@ class TkCanvas<TkWindow
     tk_send_without_enc('scan', 'mark', x, y)
     self
   end
-  def scan_dragto(x, y)
+  def scan_dragto(x, y, gain=None)
-    tk_send_without_enc('scan', 'dragto', x, y)
+    tk_send_without_enc('scan', 'dragto', x, y, gain)
     self
   end
 

ext/tk/lib/tk/scrollable.rb

@@ -4,7 +4,7 @@
 require 'tk'
 
 module Tk
-  module X_Scrollable
+  module XScrollable
     def xscrollcommand(cmd=Proc.new)
       configure_cmd 'xscrollcommand', cmd
       # Tk.update  # avoid scrollbar trouble
@@ -38,7 +38,7 @@ module Tk
     end
   end
 
-  module Y_Scrollable
+  module YScrollable
     def yscrollcommand(cmd=Proc.new)
       configure_cmd 'yscrollcommand', cmd
       # Tk.update  # avoid scrollbar trouble
@@ -72,8 +72,11 @@ module Tk
     end
   end
 
+  X_Scrollable = XScrollable
+  Y_Scrollable = YScrollable
+
   module Scrollable
-    include X_Scrollable
+    include XScrollable
-    include Y_Scrollable
+    include YScrollable
   end
 end

ext/tk/lib/tk/txtwin_abst.rb

@@ -4,7 +4,7 @@
 require 'tk'
 
 class TkTextWin<TkWindow
-  TkCommnadNames = [].freeze
+  TkCommandNames = [].freeze
   #def create_self
   #  fail RuntimeError, "TkTextWin is an abstract class"
   #end

ext/tk/lib/tkextlib/blt/tile/checkbutton.rb

@@ -9,9 +9,9 @@ require 'tkextlib/blt/tile.rb'
 
 module Tk::BLT
   module Tile
-    class Checkbutton < TkCheckbutton
+    class CheckButton < TkCheckButton
       TkCommandNames = ['::blt::tile::checkbutton'.freeze].freeze
     end
-    CheckButton = Checkbutton
+    Checkbutton = CheckButton
   end
 end

ext/tk/lib/tkextlib/blt/tile/radiobutton.rb

@@ -9,9 +9,9 @@ require 'tkextlib/blt/tile.rb'
 
 module Tk::BLT
   module Tile
-    class Radiobutton < TkRadiobutton
+    class RadioButton < TkRadioButton
       TkCommandNames = ['::blt::tile::radiobutton'.freeze].freeze
     end
-    RadioButton = Radiobutton
+    Radiobutton = RadioButton
   end
 end

ext/tk/lib/tkextlib/iwidgets/checkbox.rb

@@ -87,7 +87,7 @@ class Tk::Iwidgets::Checkbox
 
   def get(idx)
     simplelist(tk_call(@path, 'get', index(idx))).collect{|id|
-      Tk::Itk::Component.id2obj(id)
+      Tk::Itk::Component.id2obj(self, id)
     }
   end
 

ext/tk/lib/tkextlib/iwidgets/radiobox.rb

@@ -87,7 +87,7 @@ class Tk::Iwidgets::Radiobox
 
   def get(idx)
     simplelist(tk_call(@path, 'get', index(idx))).collect{|id|
-      Tk::Itk::Component.id2obj(id)
+      Tk::Itk::Component.id2obj(self, id)
     }
   end
 

ext/tk/lib/tkextlib/version.rb

@@ -2,5 +2,5 @@
 # release date of tkextlib
 #
 module Tk
-  Tkextlib_RELEASE_DATE = '2006-11-07'.freeze
+  Tkextlib_RELEASE_DATE = '2007-01-26'.freeze
 end