From bb2b3d30ba9207c51c183b3fbceb15a1564d9483 Mon Sep 17 00:00:00 2001
From: lecoanet
Date: Fri, 29 Mar 2002 13:36:32 +0000
Subject: *** empty log message ***

---
 sandbox/testzinc.pl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'sandbox/testzinc.pl')

diff --git a/sandbox/testzinc.pl b/sandbox/testzinc.pl
index 941d11b..2b755fd 100644
--- a/sandbox/testzinc.pl
+++ b/sandbox/testzinc.pl
@@ -24,7 +24,7 @@ $delay = 2000;
 $rate = 0.3;
 %tracks = ();
 
-$zinc = $mw->Zinc(-render => 1, -backcolor => 'gray65', -relief => 'sunken');
+$zinc = $mw->Zinc(-render => 0, -backcolor => 'gray65', -relief => 'sunken');
 $zinc->pack(-expand => 1, -fill => 'both');
 $zinc->configure(-width => $zinc_width, -height => $zinc_height);
 #$radar = $top;
@@ -126,6 +126,8 @@ sub create_tracks {
 	$d = (rand() > 0.5) ? 1 : -1;
 	$track->{'vy'} =  (8.0 + rand(10.0)) * $d;
 	$zinc->itemconfigure($item,
+			     -lastasfirst => 1,
+			     -symbolcolor => 'red',
 			     -position => [$track->{'x'}, $track->{'y'}],
 			     -speedvector => [$track->{'vx'}, $track->{'vy'}],
 			     -speedvectorsensitive => 1,
-- 
cgit v1.1