diff options
author | lecoanet | 2004-09-21 07:52:10 +0000 |
---|---|---|
committer | lecoanet | 2004-09-21 07:52:10 +0000 |
commit | 6a495d868f7fa7a0989f2fe7c30ce468496b2f10 (patch) | |
tree | bad6730489e70ea51dba0fc62d78b01e4dd5218c /demos/iconTransform.tcl | |
parent | 9373cebaaceb73b1f0682dfa764dc3f86f4a3721 (diff) | |
download | tkzinc-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.tcl | 2 |
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] |