From c12c7ab1dcdffc82886b9ad5a082669cd6056843 Mon Sep 17 00:00:00 2001
From: matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Fri, 17 Nov 2000 09:09:03 +0000
Subject: matz

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@1045 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ext/tk/lib/tk.rb      | 10 ++++++----
 ext/tk/lib/tkclass.rb |  2 +-
 2 files changed, 7 insertions(+), 5 deletions(-)

diff --git a/ext/tk/lib/tk.rb b/ext/tk/lib/tk.rb
index d3b3714a28..54d5d861f8 100644
--- a/ext/tk/lib/tk.rb
+++ b/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
diff --git a/ext/tk/lib/tkclass.rb b/ext/tk/lib/tkclass.rb
index 0b33d4ec8b..f5673d7fe7 100644
--- a/ext/tk/lib/tkclass.rb
+++ b/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
-- 
cgit v1.2.3