diff options
Diffstat (limited to 'demos')
| -rw-r--r-- | demos/simpleRadar.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
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 |