diff options
| -rw-r--r-- | demos/reliefs.tcl | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/demos/reliefs.tcl b/demos/reliefs.tcl index d9fefa4..c593ee3 100644 --- a/demos/reliefs.tcl +++ b/demos/reliefs.tcl @@ -5,12 +5,10 @@ if {![info exists zincDemo]} { error "This script should be run from the zinc-widget demo." } -package require Img - set w .reliefs catch {destroy $w} toplevel $w -wm title $w "Zinc photo transparency Demonstration" +wm title $w "Zinc Relief Testbed" wm iconname $w reliefs set allReliefs {flat raised sunken groove ridge \ |