summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authornagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2003-10-14 18:54:21 +0000
committernagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2003-10-14 18:54:21 +0000
commitb4337be29ff0f6e9a461791c30c2ae7c4d4dbe5a (patch)
tree85021a9531a172b09d783297dcf7d51c50022e47
parent382b4ae9a34c2f697464e1e42fd0fdc277fdd3c3 (diff)
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
-rw-r--r--ext/tk/lib/tk.rb9
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