diff options
Diffstat (limited to 'library/demos/label.tcl')
-rw-r--r-- | library/demos/label.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/library/demos/label.tcl b/library/demos/label.tcl index 13463f7..690fc9a 100644 --- a/library/demos/label.tcl +++ b/library/demos/label.tcl @@ -10,7 +10,7 @@ if {![info exists widgetDemo]} { package require Tk set w .label -catch {destroy $w} +destroy $w toplevel $w wm title $w "Label Demonstration" wm iconname $w "label" |