diff options
author | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2005-06-16 09:22:01 +0000 |
---|---|---|
committer | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2005-06-16 09:22:01 +0000 |
commit | 200c44f4f47cec5435cd60780174a396cf947823 (patch) | |
tree | df48f14ae0daecbadb21493a7ec3e8c7072ffbaf | |
parent | a20da17cb829887153d316b8a29c5ea8d66a68d1 (diff) | |
download | ruby-200c44f4f47cec5435cd60780174a396cf947823.tar.gz ruby-200c44f4f47cec5435cd60780174a396cf947823.tar.xz ruby-200c44f4f47cec5435cd60780174a396cf947823.zip |
* lib/tkextlib/SUPPOPRT_STATUS: add RELEASE_DATE information.
* lib/tkextlib/tile/style.rb: add "style element options <elem>"
command support.
git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@8634 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
-rw-r--r-- | ext/tk/ChangeLog.tkextlib | 7 | ||||
-rw-r--r-- | ext/tk/lib/tkextlib/SUPPORT_STATUS | 3 | ||||
-rw-r--r-- | ext/tk/lib/tkextlib/tile/style.rb | 4 |
3 files changed, 14 insertions, 0 deletions
diff --git a/ext/tk/ChangeLog.tkextlib b/ext/tk/ChangeLog.tkextlib index 325fd99ac..89c33a4dc 100644 --- a/ext/tk/ChangeLog.tkextlib +++ b/ext/tk/ChangeLog.tkextlib @@ -1,3 +1,10 @@ +2005-06-16 Hidetoshi NAGAI <nagai@ai.kyutech.ac.jp> + + * lib/tkextlib/SUPPOPRT_STATUS: add RELEASE_DATE information. + + * lib/tkextlib/tile/style.rb: add "style element options <elem>" + command support. + 2005-06-08 Hidetoshi NAGAI <nagai@ai.kyutech.ac.jp> * lib/tkextlib/ICONS/icons.rb: fail to create instances of diff --git a/ext/tk/lib/tkextlib/SUPPORT_STATUS b/ext/tk/lib/tkextlib/SUPPORT_STATUS index 45af92b42..587af51bd 100644 --- a/ext/tk/lib/tkextlib/SUPPORT_STATUS +++ b/ext/tk/lib/tkextlib/SUPPORT_STATUS @@ -1,6 +1,8 @@ [ current support status of Tcl/Tk extensions ] + *******<<< RELEASE_DATE of the libraries : 2005/06/16 >>>******* + The following list shows *CURRENT* status when this file was modifyed at last. If you want to add other Tcl/Tk extensions to the planed list (or change its status position), please request them at the ruby-talk, @@ -178,6 +180,7 @@ Mk4tcl *** http://www.equi4.com/metakit/tcl.html Memchan *** http://memchan.sourceforge.net/ +XOTcl *** http://www.xotcl.org/ ===< tool (may not supprt) >================================================== diff --git a/ext/tk/lib/tkextlib/tile/style.rb b/ext/tk/lib/tkextlib/tile/style.rb index 99b2fd0e7..4245d315f 100644 --- a/ext/tk/lib/tkextlib/tile/style.rb +++ b/ext/tk/lib/tkextlib/tile/style.rb @@ -67,6 +67,10 @@ class << Tk::Tile::Style list(tk_call('style', 'element', 'names')) end + def element_options(elem) + simplelist(tk_call('style', 'element', 'options', elem)) + end + def theme_create(name, keys=nil) if keys && keys != None tk_call('style', 'theme', 'create', name, *hash_kv(keys)) |