From b214ad862bab5b6fa7c68422b282b1b4cf00bc6a Mon Sep 17 00:00:00 2001
From: nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Sat, 2 Aug 2003 09:58:13 +0000
Subject: * (bug fix) forgot to entry a widget class name of 'labelframe'
 widget * add demo-scripts to the JP/EN widget demos

git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@4287 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ext/tk/lib/tk.rb | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'ext/tk/lib')

diff --git a/ext/tk/lib/tk.rb b/ext/tk/lib/tk.rb
index 6f3de4e41..a2d2bf898 100644
--- a/ext/tk/lib/tk.rb
+++ b/ext/tk/lib/tk.rb
@@ -4271,6 +4271,9 @@ class TkFrame<TkWindow
 end
 
 class TkLabelFrame<TkFrame
+  TkCommandNames = ['labelframe'.freeze].freeze
+  WidgetClassName = 'Labelframe'.freeze
+  WidgetClassNames[WidgetClassName] = self
   def create_self(keys)
     if keys and keys != None
       tk_call 'labelframe', @path, *hash_kv(keys)
@@ -4279,6 +4282,7 @@ class TkLabelFrame<TkFrame
     end
   end
 end
+TkLabelframe = TkLabelFrame
 
 class TkPanedWindow<TkWindow
   TkCommandNames = ['panedwindow'.freeze].freeze
-- 
cgit