diff options
| author | treectrl <treectrl> | 2006-10-04 04:08:25 (GMT) |
|---|---|---|
| committer | treectrl <treectrl> | 2006-10-04 04:08:25 (GMT) |
| commit | d55cd8005142ffe55184f4b32c4ef65ce82ae957 (patch) | |
| tree | 1c94f858f873585bc02982095a8512bb6030071c /demos/style-editor.tcl | |
| parent | 423236f6282a9bcf4462fb705f98c637933fded6 (diff) | |
| download | tktreectrl-d55cd8005142ffe55184f4b32c4ef65ce82ae957.zip tktreectrl-d55cd8005142ffe55184f4b32c4ef65ce82ae957.tar.gz tktreectrl-d55cd8005142ffe55184f4b32c4ef65ce82ae957.tar.bz2 | |
Column -tag is now -tags (although -tag is still backwards-compatible).
Diffstat (limited to 'demos/style-editor.tcl')
| -rw-r--r-- | demos/style-editor.tcl | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/demos/style-editor.tcl b/demos/style-editor.tcl index f809f8f..d10da44 100644 --- a/demos/style-editor.tcl +++ b/demos/style-editor.tcl @@ -1,4 +1,4 @@ -# RCS: @(#) $Id: style-editor.tcl,v 1.7 2006/09/16 20:10:27 treectrl Exp $ +# RCS: @(#) $Id: style-editor.tcl,v 1.8 2006/10/04 04:10:20 treectrl Exp $ namespace eval StyleEditor { variable Info @@ -30,7 +30,7 @@ proc StyleEditor::Init {Tdemo} { TreePlusScrollbarsInAFrame $w.pwH.pwV.styleList 0 1 set T $w.pwH.pwV.styleList.t $T configure -showbuttons no -showlines no -showroot no -width 100 -height 200 - $T column create -text "Styles" -expand yes -button no -tag C0 + $T column create -text "Styles" -expand yes -button no -tags C0 $T configure -treecolumn C0 $T notify bind $T <Selection> { @@ -42,7 +42,7 @@ proc StyleEditor::Init {Tdemo} { TreePlusScrollbarsInAFrame $w.pwH.pwV.elementList 0 1 set T $w.pwH.pwV.elementList.t $T configure -showbuttons no -showlines no -showroot no -width 100 -height 200 - $T column create -text "Elements" -expand yes -button no -tag C0 + $T column create -text "Elements" -expand yes -button no -tags C0 $T configure -treecolumn C0 $T notify bind $T <Selection> { @@ -62,9 +62,9 @@ proc StyleEditor::Init {Tdemo} { TreePlusScrollbarsInAFrame $fRight.propertyList 0 1 set T $fRight.propertyList.t $T configure -showbuttons no -showlines no -showroot no - $T column create -text "Property" -expand yes -button no -tag property \ + $T column create -text "Property" -expand yes -button no -tags property \ -itembackground {#E8E8E8 ""} - $T column create -text "Value" -expand yes -button no -tag value \ + $T column create -text "Value" -expand yes -button no -tags value \ -itembackground {#E8E8E8 ""} $T configure -treecolumn property |