diff options
author | lecoanet | 2004-02-23 09:16:48 +0000 |
---|---|---|
committer | lecoanet | 2004-02-23 09:16:48 +0000 |
commit | ef07ddc87875cc9b88715099434e2dcff4726322 (patch) | |
tree | acd7f4fb3fbec0b056dcac6cf340803f67cc9244 /demos/magicLens.tcl | |
parent | 8b11edd43da0482b2d427c8789a03aacb0f5b3fa (diff) | |
download | tkzinc-ef07ddc87875cc9b88715099434e2dcff4726322.zip tkzinc-ef07ddc87875cc9b88715099434e2dcff4726322.tar.gz tkzinc-ef07ddc87875cc9b88715099434e2dcff4726322.tar.bz2 tkzinc-ef07ddc87875cc9b88715099434e2dcff4726322.tar.xz |
Started reworking Tcl demos
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" |