From 461a646aa62fb323b214b44504519f657045d99a Mon Sep 17 00:00:00 2001
From: treectrl <treectrl>
Date: Sat, 28 Oct 2006 01:24:13 +0000
Subject: Stop using deprecated commands.

---
 demos/biglist.tcl      | 4 ++--
 demos/firefox.tcl      | 4 ++--
 demos/style-editor.tcl | 4 ++--
 3 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/demos/biglist.tcl b/demos/biglist.tcl
index c1cab8d..e1e606d 100644
--- a/demos/biglist.tcl
+++ b/demos/biglist.tcl
@@ -1,4 +1,4 @@
-# RCS: @(#) $Id: biglist.tcl,v 1.8 2006/10/04 03:57:08 treectrl Exp $
+# RCS: @(#) $Id: biglist.tcl,v 1.9 2006/10/28 01:24:13 treectrl Exp $
 
 set ::clip 1
 proc DemoBigList {} {
@@ -367,7 +367,7 @@ proc BigListButton1 {w x y} {
 			return
 		}
 		if {[$w item tag expr $item !info]} {
-			$w toggle $item
+			$w item toggle $item
 		}
 	}
 	return
diff --git a/demos/firefox.tcl b/demos/firefox.tcl
index 78b1040..136bed6 100644
--- a/demos/firefox.tcl
+++ b/demos/firefox.tcl
@@ -1,4 +1,4 @@
-# RCS: @(#) $Id: firefox.tcl,v 1.14 2006/10/14 20:21:49 treectrl Exp $
+# RCS: @(#) $Id: firefox.tcl,v 1.15 2006/10/28 01:24:13 treectrl Exp $
 
 proc DemoFirefoxPrivacy {} {
 
@@ -443,7 +443,7 @@ proc DemoFirefoxPrivacyButton1 {w x y} {
 			return
 		}
 		if {[lindex $id 5] eq "eText1"} {
-			$w toggle $item
+			$w item toggle $item
 			DisplayStylesInItem $item
 		}
 	}
diff --git a/demos/style-editor.tcl b/demos/style-editor.tcl
index d10da44..9336df1 100644
--- a/demos/style-editor.tcl
+++ b/demos/style-editor.tcl
@@ -1,4 +1,4 @@
-# RCS: @(#) $Id: style-editor.tcl,v 1.8 2006/10/04 04:10:20 treectrl Exp $
+# RCS: @(#) $Id: style-editor.tcl,v 1.9 2006/10/28 01:24:13 treectrl Exp $
 
 namespace eval StyleEditor {
 	variable Info
@@ -723,7 +723,7 @@ proc StyleEditor::StyleToCanvas {{scroll 0}} {
     }
     # No selected item uses the current style, look for an unselected item
     if {$match eq ""} {
-	foreach I [$Tdemo range first last] {
+	foreach I [$Tdemo item range first last] {
 	    set C 0
 	    foreach S [$Tdemo item style set $I] {
 		if {$S eq $style} {
-- 
cgit v0.12