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 | 9c93c72b4fad1266c1c0312c0f9f2e890624cf29 (patch) | |
tree | c9552a229e194096f8ef09fe4edf551b66bfd479 /ext/tk/lib/tkextlib/blt/tabset.rb | |
parent | 871c3691235fd0bafb5612f451ac4fc50f1b3059 (diff) | |
download | ruby-9c93c72b4fad1266c1c0312c0f9f2e890624cf29.tar.gz ruby-9c93c72b4fad1266c1c0312c0f9f2e890624cf29.tar.xz ruby-9c93c72b4fad1266c1c0312c0f9f2e890624cf29.zip |
* 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: http://svn.ruby-lang.org/repos/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 693cce507..c26b6ee00 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 |