aboutsummaryrefslogtreecommitdiff
path: root/sandbox/testarc.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'sandbox/testarc.tcl')
-rw-r--r--sandbox/testarc.tcl4
1 files changed, 2 insertions, 2 deletions
diff --git a/sandbox/testarc.tcl b/sandbox/testarc.tcl
index 6c3f777..deaf98b 100644
--- a/sandbox/testarc.tcl
+++ b/sandbox/testarc.tcl
@@ -1,6 +1,6 @@
#!/usr/bin/wish -f
-load tkradar3.1.so
+load tkzinc3.1.so
package require Img
set top 1
@@ -9,7 +9,7 @@ image create photo logo -file /usr/share/toccata/images/logo.gif
#image create photo papier -file /usr/share/toccata/images/dgtexture-dragstrip.xpm
image create photo penguin -file /usr/X11R6/include/X11/pixmaps/xpenguin_color.xpm
-set r [radar .r -backcolor gray -relief sunken]
+set r [zinc .r -backcolor gray -relief sunken]
pack .r -expand t -fill both
.r configure -width 800 -height 500
#.r configure -drawbboxes t