diff options
author | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2008-06-19 07:08:06 +0000 |
---|---|---|
committer | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2008-06-19 07:08:06 +0000 |
commit | 6bb934c482e360b1713ca692301c30a6277f4bd3 (patch) | |
tree | d2caca8b01afb1c4e0d4f7a60c5b05eb795905d9 /ext | |
parent | 1bc6479a8830f26c821003de1818f4750ab5cc26 (diff) | |
download | ruby-6bb934c482e360b1713ca692301c30a6277f4bd3.tar.gz |
* ext/tk/lib/tkextlib/tile/treeview.rb: cannot configure tags.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@17423 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext')
-rw-r--r-- | ext/tk/lib/tkextlib/tile/treeview.rb | 19 |
1 files changed, 10 insertions, 9 deletions
diff --git a/ext/tk/lib/tkextlib/tile/treeview.rb b/ext/tk/lib/tkextlib/tile/treeview.rb index c978a1a07b..566e48def3 100644 --- a/ext/tk/lib/tkextlib/tile/treeview.rb +++ b/ext/tk/lib/tkextlib/tile/treeview.rb @@ -379,12 +379,12 @@ module Tk::Tile::TreeviewConfig ################### def __item_cget_cmd(id) - [self.path, id[0], id[1]] + [self.path, *id] end private :__item_cget_cmd def __item_config_cmd(id) - [self.path, id[0], id[1]] + [self.path, *id] end private :__item_config_cmd @@ -638,19 +638,19 @@ module Tk::Tile::TreeviewConfig # Treeview Tag def tagcget(tagOrId, option) - __itemcget([:tag, tagOrId], option) + __itemcget([:tag, :configure, tagOrId], option) end def tagcget_strict(tagOrId, option) - __itemcget_strict([:tag, tagOrId], option) + __itemcget_strict([:tag, :configure, tagOrId], option) end def tagconfigure(tagOrId, slot, value=None) - __itemconfigure([:tag, tagOrId], slot, value) + __itemconfigure([:tag, :configure, tagOrId], slot, value) end def tagconfiginfo(tagOrId, slot=nil) - __itemconfiginfo([:tag, tagOrId], slot) + __itemconfiginfo([:tag, :configure, tagOrId], slot) end def current_tagconfiginfo(tagOrId, slot=nil) - __current_itemconfiginfo([:tag, tagOrId], slot) + __current_itemconfiginfo([:tag, :configure, tagOrId], slot) end alias tag_cget tagcget alias tag_cget_strict tagcget_strict @@ -943,7 +943,7 @@ class Tk::Tile::Treeview::Tag < TkObject TagID_TBL[@tpath][@id] = self } if keys && keys != None - tk_call_without_enc(@tpath, 'tag', 'configure', *hash_kv(keys, true)) + tk_call_without_enc(@tpath, 'tag', 'configure', @id, *hash_kv(keys,true)) end end def id @@ -1034,7 +1034,8 @@ class Tk::Tile::Treeview < TkWindow id.kind_of?(Tk::Tile::Treeview::Tag) id.id elsif id.kind_of?(Array) - [id[0], _get_eval_string(id[1])] + # size is 2 or 3 + id[0..-2] << _get_eval_string(id[-1]) else _get_eval_string(id) end |