diff --git a/ChangeLog b/ChangeLog
index 1a4f41b2b1..eae337562e 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Sat Jul 18 07:56:00 2009  Hidetoshi NAGAI  <nagai@ai.kyutech.ac.jp>
+
+	* ext/tk/lib/tk.rb: fail to create a widget object for an unknown
+	  wiget path. 
+
 Sat Jul 18 07:06:31 2009  Hidetoshi NAGAI  <nagai@ai.kyutech.ac.jp>
 
 	* ext/tk/lib/tk.rb,ext/tk/lib/tk/grid.rb: Bug fix on grid_slaves().
diff --git a/ext/tk/lib/tk.rb b/ext/tk/lib/tk.rb
index 95c2598cfd..f97c02dfad 100644
--- a/ext/tk/lib/tk.rb
+++ b/ext/tk/lib/tk.rb
@@ -119,7 +119,7 @@ module TkComm
       classname_def = ''
     else # ruby_class == nil
       if Tk.const_defined?(tk_class)
-        mod.const_get(tk_class)  # auto_load
+        Tk.const_get(tk_class)  # auto_load
         ruby_class = WidgetClassNames[tk_class]
       end