diff options
Diffstat (limited to 'library/demos/msgbox.tcl')
| -rw-r--r-- | library/demos/msgbox.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/library/demos/msgbox.tcl b/library/demos/msgbox.tcl index bd98bf2..7961107 100644 --- a/library/demos/msgbox.tcl +++ b/library/demos/msgbox.tcl @@ -9,7 +9,7 @@ if {![info exists widgetDemo]} { package require Tk set w .msgbox -catch {destroy $w} +destroy $w toplevel $w wm title $w "Message Box Demonstration" wm iconname $w "messagebox" |