matz

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

ext/tk/lib/tk.rb

@@ -2334,9 +2334,9 @@ class TkButton<TkLabel
   end
 end
 
-class TkRadioButton<TkButton
+class TkRadiobutton<TkButton
   WidgetClassNames['Radiobutton'] = self
-  def TkRadioButton.to_eval
+  def TkRadiobutton.to_eval
     'Radiobutton'
   end
   def create_self
@@ -2352,10 +2352,11 @@ class TkRadioButton<TkButton
     configure 'variable', tk_trace_variable(v)
   end
 end
+tkRadioButton = TkRadiobutton
 
-class TkCheckButton<TkRadioButton
+class TkCheckbutton<TkRadiobutton
   WidgetClassNames['Checkbutton'] = self
-  def TkCheckButton.to_eval
+  def TkCheckbutton.to_eval
     'Checkbutton'
   end
   def create_self
@@ -2365,6 +2366,7 @@ class TkCheckButton<TkRadioButton
     tk_send 'toggle'
   end
 end
+TkCheckButton = TkCheckbutton
 
 class TkMessage<TkLabel
   WidgetClassNames['Message'] = self

ext/tk/lib/tkclass.rb

@@ -9,7 +9,7 @@ TopLevel = TkToplevel
 Frame = TkFrame
 Label = TkLabel
 Button = TkButton
-Radiobutton = TkRadioButton
+Radiobutton = TkRadiobutton
 Checkbutton = TkCheckButton
 Message = TkMessage
 Entry = TkEntry