diff options
Diffstat (limited to 'demos/help.tcl')
-rw-r--r-- | demos/help.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/demos/help.tcl b/demos/help.tcl index 0ee2125..0607906 100644 --- a/demos/help.tcl +++ b/demos/help.tcl @@ -14,7 +14,7 @@ proc DemoHelpContents {} { InitPics help-* - $T column configure 0 -text "Help Contents" + $T column create -text "Help Contents" # Define a new item state $T state define mouseover @@ -126,7 +126,7 @@ proc DemoHelpContents2 {} { InitPics help-* - $T column configure 0 -text "Help Contents" + $T column create -text "Help Contents" $T element create e1 image -image help-page $T element create e2 image -image {help-book-open {open} help-book-closed {}} |