ext/tk/lib/tk.rb:

 * fixed trouble on auto-load Tcl commands (enbug on the last commit).


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@4763 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 7 insertions, 2 deletions

diff --git a/ext/tk/lib/tk.rb b/ext/tk/lib/tk.rb
index 47148e43ce..fcf9d11593 100644
--- a/ext/tk/lib/tk.rb
+++ b/ext/tk/lib/tk.rb
@@ -1155,7 +1155,6 @@ module Tk
     end
   end
 
-
   def root
     TkRoot.new
   end
@@ -2245,8 +2244,14 @@ module Tk
       auto_path = Tk::LIBRARY
     end
   end
+
   AUTO_PATH = TkVarAccess.new('auto_path', auto_path)
-  AUTO_OLDPATH = TkVarAccess.new('auto_oldpath', auto_path)
+
+=begin
+  AUTO_OLDPATH = tk_split_simplelist(INTERP._invoke('set', 'auto_oldpath'))
+  AUTO_OLDPATH.each{|s| s.freeze}
+  AUTO_OLDPATH.freeze
+=end
 
   TCL_PACKAGE_PATH = TkVarAccess.new('tcl_pkgPath')
   PACKAGE_PATH = TCL_PACKAGE_PATH