diff options
Diffstat (limited to 'demos/magicLens.tcl')
-rw-r--r-- | demos/magicLens.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/demos/magicLens.tcl b/demos/magicLens.tcl index a095248..b44254b 100644 --- a/demos/magicLens.tcl +++ b/demos/magicLens.tcl @@ -169,7 +169,7 @@ proc LensTranslate {way} { } -set w .testGraphics +set w .magicLens catch {destroy $w} toplevel $w wm title $w "Color Magic Lens Demonstration" |