diff options
| author | treectrl <treectrl> | 2006-10-28 01:24:13 (GMT) |
|---|---|---|
| committer | treectrl <treectrl> | 2006-10-28 01:24:13 (GMT) |
| commit | 461a646aa62fb323b214b44504519f657045d99a (patch) | |
| tree | 77abab12a61fc1d47d38b3767f688542e19fc9a8 /demos/biglist.tcl | |
| parent | 5b6b792cd49d65536ee282ebeaac850ac64f12f9 (diff) | |
| download | tktreectrl-461a646aa62fb323b214b44504519f657045d99a.zip tktreectrl-461a646aa62fb323b214b44504519f657045d99a.tar.gz tktreectrl-461a646aa62fb323b214b44504519f657045d99a.tar.bz2 | |
Stop using deprecated commands.
Diffstat (limited to 'demos/biglist.tcl')
| -rw-r--r-- | demos/biglist.tcl | 4 |
1 files changed, 2 insertions, 2 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 |