diff options
| author | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2003-10-14 18:54:21 +0000 |
|---|---|---|
| committer | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2003-10-14 18:54:21 +0000 |
| commit | c067a43f1c6e44fb8109abce049ccadee62b6a60 (patch) | |
| tree | 85021a9531a172b09d783297dcf7d51c50022e47 | |
| parent | f033d8519f4f6955f28c44a6205971f6a4eb439d (diff) | |
| download | ruby-c067a43f1c6e44fb8109abce049ccadee62b6a60.tar.gz ruby-c067a43f1c6e44fb8109abce049ccadee62b6a60.tar.xz ruby-c067a43f1c6e44fb8109abce049ccadee62b6a60.zip | |
ext/tk/lib/tk.rb:
* fixed trouble on auto-load Tcl commands (enbug on the last commit).
git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@4763 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
| -rw-r--r-- | ext/tk/lib/tk.rb | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/ext/tk/lib/tk.rb b/ext/tk/lib/tk.rb index 47148e43c..fcf9d1159 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 |