* ext/tk/sample/tkextlib/treectrl/help.rb: fixed typo. (wrong color)

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@8274 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
ocean 2005-04-07 18:02:18 +00:00
parent 45b5c311a7
commit e82a3d23c7
2 changed files with 13 additions and 4 deletions

View File

@ -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>

View File

@ -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])