This commit was manufactured by cvs2svn to create tag 'v1_1d-start'.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/tags/v1_1d-start@299 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 7 insertions, 1 deletions

diff --git a/lib/tk.rb b/lib/tk.rb
index f44a1fe4a8..7a5d85f1df 100644
--- a/lib/tk.rb
+++ b/lib/tk.rb
@@ -1548,10 +1548,16 @@ module TkTreatFont
   end
 end
 
-class TkObject<TkKernel
+class TkObject
   include Tk
   include TkTreatFont
 
+  def TkObject.new(*args, &block)
+    obj = super
+    obj.instance_eval(&block) if block
+    obj
+  end
+
   def path
     return @path
   end