diff options
| author | ocean <ocean@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2005-04-07 18:02:18 +0000 |
|---|---|---|
| committer | ocean <ocean@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2005-04-07 18:02:18 +0000 |
| commit | 35f5b01b36d07b6b76763e3f314deb3a522a87d9 (patch) | |
| tree | 11e5ebd505e17b274aacf145433b393d9bcd6c9d /ext/tk | |
| parent | a45814935e53fb9be234526f8f9ec652b415dc41 (diff) | |
* ext/tk/sample/tkextlib/treectrl/help.rb: fixed typo. (wrong color)
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_8@8274 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext/tk')
| -rw-r--r-- | ext/tk/ChangeLog.tkextlib | 12 | ||||
| -rw-r--r-- | ext/tk/sample/tkextlib/treectrl/help.rb | 5 |
2 files changed, 13 insertions, 4 deletions
diff --git a/ext/tk/ChangeLog.tkextlib b/ext/tk/ChangeLog.tkextlib index 545f574d5d..6a5338ed17 100644 --- a/ext/tk/ChangeLog.tkextlib +++ b/ext/tk/ChangeLog.tkextlib @@ -1,6 +1,16 @@ 2005-04-08 ocean <ocean@ruby-lang.org> - * sample/tkextlib/treectrl/*.rb: fixed typo. (wrong itemheight) + * sample/tkextlib/treectrl/help.rb: fixed typo. (wrong color) + +2005-04-08 ocean <ocean@ruby-lang.org> + + * sample/tkextlib/treectrl/random.rb: fixed typo. (wrong itemheight) + + * sample/tkextlib/treectrl/outlook-newgroup.rb: ditto. + + * sample/tkextlib/treectrl/explorer.rb: ditto. + + * sample/tkextlib/treectrl/help.rb: ditto. 2005-04-07 ocean <ocean@ruby-lang.org> diff --git a/ext/tk/sample/tkextlib/treectrl/help.rb b/ext/tk/sample/tkextlib/treectrl/help.rb index 4acd9c7382..be67cc5729 100644 --- a/ext/tk/sample/tkextlib/treectrl/help.rb +++ b/ext/tk/sample/tkextlib/treectrl/help.rb @@ -30,7 +30,7 @@ def demoHelpContents(t) 'blue', ['mouseover'] ]) t.element_create('e4', :rect, :showfocus=>true, - :fill=>[@SystemHighligh, ['selected', 'focus']]) + :fill=>[@SystemHighlight, ['selected', 'focus']]) # book s = t.style_create('s1') @@ -122,8 +122,7 @@ def demoHelpContents(t) treeCtrlHelp.bind('Button1-Motion', proc{|w, x, y| if w.selection_get.length == 1 - if (TkPackage.vcompare(Tk::TreeCtrl.package_version, - '1.1') >= 0) + if $Version_1_1_OrLater w.item_toggle(w.selection_get[0]) else # TreeCtrl 1.0 w.toggle(w.selection_get[0]) |