| # | Line 36 | Line 36 | proc zonechange {nm el op} { # record change in ZONE | |
|---|---|---|
| 36 | return | |
| 37 | } | |
| 38 | trace vdelete radvar(ZONE) wu zonechange | |
| 39 | < | set radvar(ZONE) "$zonevar(IE) $zonevar(xmin) $zonevar(xmax) $zonevar(ymin) $zonevar(ymax) $zonevar(zmin) $zonevar(zmax)" |
| 39 | > | set radvar(ZONE) "$zonevar(IE) $zonevar(xmin) $zonevar(xmax) $zonevar(ymin) $zonevar(ymax) $zonevar(zmin) $zonevar(zmax)" |
| 40 | trace variable radvar(ZONE) wu zonechange | |
| 41 | } | |
| 42 | ||
| – | Removed lines |
| + | Added lines |
| < | Changed lines (old) |
| > | Changed lines (new) |