diff options
author | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2005-10-22 22:16:33 +0000 |
---|---|---|
committer | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2005-10-22 22:16:33 +0000 |
commit | a3d7c3b80984d58d849eb774f43364aadf077e2a (patch) | |
tree | c9552a229e194096f8ef09fe4edf551b66bfd479 /ext/tk/lib/tkextlib/blt/tabset.rb | |
parent | 2e4c479a6bef19468d430b7291d911581ae13dfe (diff) |
* ext/tcltklib/extconf.rb: improbe messages [ruby-core:06325].
* ext/tk/lib/tk.rb, ext/tk/lib/tk/canvas.rb, ext/tk/lib/tk/entry.rb,
ext/tk/lib/tk/frame.rb, ext/tk/lib/tk/image.rb,
ext/tk/lib/tk/itemconfig.rb, ext/tk/lib/tk/labelframe.rb,
ext/tk/lib/tk/listbox.rb, ext/tk/lib/tk/menu.rb,
ext/tk/lib/tk/radiobutton.rb, ext/tk/lib/tk/scale.rb,
ext/tk/lib/tk/spinbox.rb, ext/tk/lib/tk/text.rb,
ext/tk/lib/tk/toplevel.rb: improve conversion of option values.
* ext/tk/lib/tkextlib/*: ditto.
* ext/tk/lib/tkextlib/*: update to support ActiveTcl8.4.11.2.
* ext/tk/lib/tkextlib/trofs/*: support Trofs 0.4.3.
* ext/tk/lib/tkextlib/tile/*: support Tile 0.7.2.
* ext/tk/lib/tkextlib/vu/*: support vu 2.3.0.
* ext/tk/lib/tkextlib/tcllib/*: support Tcllib 1.8 (Tklib 0.3).
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_8@9447 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext/tk/lib/tkextlib/blt/tabset.rb')
-rw-r--r-- | ext/tk/lib/tkextlib/blt/tabset.rb | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/ext/tk/lib/tkextlib/blt/tabset.rb b/ext/tk/lib/tkextlib/blt/tabset.rb index 693cce5073..c26b6ee001 100644 --- a/ext/tk/lib/tkextlib/blt/tabset.rb +++ b/ext/tk/lib/tkextlib/blt/tabset.rb @@ -189,6 +189,16 @@ module Tk::BLT ######################################## + def __boolval_optkeys + super() << 'samewidth' << 'tearoff' + end + private :__strval_optkeys + + def __strval_optkeys + super() << 'tabbackground' << 'tabforeground' + end + private :__strval_optkeys + def __item_cget_cmd(id) [self.path, 'tab', 'cget', id] end @@ -213,6 +223,11 @@ module Tk::BLT alias tab_configinfo itemconfiginfo alias current_tab_configinfo current_itemconfiginfo + def __item_strval_optkeys(id) + super(id) << 'shadow' + end + private :__item_strval_optkeys + def tagid(tab) if tab.kind_of?(Tk::BLT::Tabset::Tab) tab.id |