diff options
| author | lecoanet | 2000-12-22 17:01:28 +0000 |
|---|---|---|
| committer | lecoanet | 2000-12-22 17:01:28 +0000 |
| commit | 45b13a34d777859147ce128a4271255e81c8c22c (patch) | |
| tree | 25939738e23b2c2d6105c266ad4519aab9636df0 /sandbox/testpoly.tcl | |
| parent | f7bba45e9c6555210d984e19e40b59c82f2153be (diff) | |
| download | tkzinc-45b13a34d777859147ce128a4271255e81c8c22c.zip tkzinc-45b13a34d777859147ce128a4271255e81c8c22c.tar.gz tkzinc-45b13a34d777859147ce128a4271255e81c8c22c.tar.bz2 tkzinc-45b13a34d777859147ce128a4271255e81c8c22c.tar.xz | |
*** empty log message ***
Diffstat (limited to 'sandbox/testpoly.tcl')
| -rw-r--r-- | sandbox/testpoly.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/sandbox/testpoly.tcl b/sandbox/testpoly.tcl index 2363a82..837b8b5 100644 --- a/sandbox/testpoly.tcl +++ b/sandbox/testpoly.tcl @@ -1,4 +1,4 @@ -#!/usr/bin/wish -f +#!/usr/bin/wish8.0 -f load tkzinc3.1.so package require Img @@ -33,7 +33,7 @@ set show {\ image create photo logo -file /usr/share/toccata/images/logo.gif #image create photo papier -file /usr/share/toccata/images/dgtexture-dragstrip.xpm -set r [zinc .r -backcolor gray -relief sunken] +set r [zinc .r -backcolor gray -relief sunken -localrender 1] pack .r -expand t -fill both .r configure -width 1024 -height 800 .r scale $top 1 -1 |