aboutsummaryrefslogtreecommitdiff
path: root/demos/iconTransform.tcl
diff options
context:
space:
mode:
authorlecoanet2004-09-21 07:52:10 +0000
committerlecoanet2004-09-21 07:52:10 +0000
commit6a495d868f7fa7a0989f2fe7c30ce468496b2f10 (patch)
treebad6730489e70ea51dba0fc62d78b01e4dd5218c /demos/iconTransform.tcl
parent9373cebaaceb73b1f0682dfa764dc3f86f4a3721 (diff)
downloadtkzinc-6a495d868f7fa7a0989f2fe7c30ce468496b2f10.zip
tkzinc-6a495d868f7fa7a0989f2fe7c30ce468496b2f10.tar.gz
tkzinc-6a495d868f7fa7a0989f2fe7c30ce468496b2f10.tar.bz2
tkzinc-6a495d868f7fa7a0989f2fe7c30ce468496b2f10.tar.xz
The various demos now use a central Tcl proc demosPath to
obtain the path to the images and data.
Diffstat (limited to 'demos/iconTransform.tcl')
-rw-r--r--demos/iconTransform.tcl2
1 files changed, 1 insertions, 1 deletions
diff --git a/demos/iconTransform.tcl b/demos/iconTransform.tcl
index cefffdb..e4527c8 100644
--- a/demos/iconTransform.tcl
+++ b/demos/iconTransform.tcl
@@ -46,7 +46,7 @@ namespace eval iconTransform {
variable topGroup [$w.zinc add group 1]
- image create photo zincAA -file [file join $zinc_library demos images zinc.gif]
+ image create photo zincAA -file [file join [demosPath] images zinc.gif]
variable zincAA [$w.zinc add icon $topGroup -image zincAA \
-position {10 10} -composescale 1 -composerotation 1]