diff options
| author | ocean <ocean@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2005-03-31 14:55:37 +0000 |
|---|---|---|
| committer | ocean <ocean@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2005-03-31 14:55:37 +0000 |
| commit | 4b7cc65b81f23a2191f53f9836074a9b686b1639 (patch) | |
| tree | 544c8fbc7632ccffeb5efdd976b7740601aa703d /ext/tk/sample/tkextlib/treectrl/demo.rb | |
| parent | 0f52655b0685e67ad1b4292b52f3194870e804fa (diff) | |
| download | ruby-4b7cc65b81f23a2191f53f9836074a9b686b1639.tar.gz | |
* ext/tk/sample/tkextlib/treectrl/demo.rb: should use Hash#index.
* ext/tk/sample/tkextlib/treectrl/demo.rb: TkImage was not cached properly.
* ext/tk/sample/tkextlib/treectrl/random.rb: fixed typo.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@8233 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext/tk/sample/tkextlib/treectrl/demo.rb')
| -rw-r--r-- | ext/tk/sample/tkextlib/treectrl/demo.rb | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/ext/tk/sample/tkextlib/treectrl/demo.rb b/ext/tk/sample/tkextlib/treectrl/demo.rb index acb5fcc192..892b5a62c7 100644 --- a/ext/tk/sample/tkextlib/treectrl/demo.rb +++ b/ext/tk/sample/tkextlib/treectrl/demo.rb @@ -7,6 +7,10 @@ $ScriptDir = File.dirname(File.expand_path(__FILE__)) $HasColumnCreate = Tk::TreeCtrl::HasColumnCreateCommand +class Hash + alias key index +end + class TkTreeCtrl_demo def initialize(dir) @ScriptDir = dir || '.' @@ -102,9 +106,8 @@ class TkTreeCtrl_demo def init_pics(*args) args.each{|pat| - pat = "#{pat}.gif" unless TkImage.names.find{|img| (name = @images.key(img)) && File.fnmatch(pat, name)} - Dir.glob(File.join(@ScriptDir, 'pics', pat)).each{|file| + Dir.glob(File.join(@ScriptDir, 'pics', "#{pat}.gif")).each{|file| name = File.basename(file, '.gif') img = TkPhotoImage.new(:file=>file) @images[name] = img |