summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ext/tk/ChangeLog.tkextlib12
-rw-r--r--ext/tk/sample/tkextlib/treectrl/help.rb5
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])