aboutsummaryrefslogtreecommitdiff
path: root/demos/magicLens.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'demos/magicLens.tcl')
-rw-r--r--demos/magicLens.tcl2
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"