From 6e96ef7d9865c85245835b71051174a9ae4b2688 Mon Sep 17 00:00:00 2001
From: lecoanet
Date: Thu, 24 Apr 2003 14:19:55 +0000
Subject: Corrected a typo that prevented destruction of the timer on exit.

---
 demos/simpleRadar.tcl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/demos/simpleRadar.tcl b/demos/simpleRadar.tcl
index 9179d4b..6fc1cce 100644
--- a/demos/simpleRadar.tcl
+++ b/demos/simpleRadar.tcl
@@ -319,7 +319,7 @@ $w.zinc add map radar -color gray50 -mapinfo paris-w
 # Animate tracks along their trajectories
 #--------------------------------------------
 set timer [after $delay "refresh $w.zinc"]
-bind $w.zinc <Destroy> "puts {canceling timer}; after cancel $timer"
+bind $w.zinc <Destroy> {puts {canceling timer}; after cancel $timer}
 
 proc refresh {z} {
     global pause timer delay tracks rate
-- 
cgit v1.1