From 59a07a0690ea964aa1f6d2f250a9ef176cac49ab Mon Sep 17 00:00:00 2001
From: nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Fri, 21 Dec 2007 08:57:35 +0000
Subject: Ruby/Tk :: provisional support on Ruby-VM and Tcl/Tk8.5.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@14426 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ext/tk/lib/tk/scale.rb | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'ext/tk/lib/tk/scale.rb')

diff --git a/ext/tk/lib/tk/scale.rb b/ext/tk/lib/tk/scale.rb
index 0b703aa055..d9e88080cf 100644
--- a/ext/tk/lib/tk/scale.rb
+++ b/ext/tk/lib/tk/scale.rb
@@ -3,7 +3,7 @@
 #
 require 'tk'
 
-class TkScale<TkWindow
+class Tk::Scale<TkWindow
   TkCommandNames = ['scale'.freeze].freeze
   WidgetClassName = 'Scale'.freeze
   WidgetClassNames[WidgetClassName] = self
@@ -84,3 +84,5 @@ class TkScale<TkWindow
     val
   end
 end
+
+TkScale = Tk::Scale unless Object.const_defined? :TkScale
-- 
cgit v1.2.3