diff options
| author | William Joye <wjoye@cfa.harvard.edu> | 2018-03-22 21:36:56 (GMT) |
|---|---|---|
| committer | William Joye <wjoye@cfa.harvard.edu> | 2018-03-22 21:36:56 (GMT) |
| commit | 029433ef7694ddd6ad170d6a28cf7dba83fc98c1 (patch) | |
| tree | 43645d1d98459cb2a846ca256b65c27ebf5f721f /ds9/library/crosshair.tcl | |
| parent | a62b1b0bb3868e37139c72aafd92ad310635c31c (diff) | |
| download | blt-029433ef7694ddd6ad170d6a28cf7dba83fc98c1.zip blt-029433ef7694ddd6ad170d6a28cf7dba83fc98c1.tar.gz blt-029433ef7694ddd6ad170d6a28cf7dba83fc98c1.tar.bz2 | |
update ds9 parsers
Diffstat (limited to 'ds9/library/crosshair.tcl')
| -rw-r--r-- | ds9/library/crosshair.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ds9/library/crosshair.tcl b/ds9/library/crosshair.tcl index e737940..6b76b04 100644 --- a/ds9/library/crosshair.tcl +++ b/ds9/library/crosshair.tcl @@ -278,8 +278,7 @@ proc ProcessCrosshairCmd {varname iname} { } lock { incr i - set crosshair(lock) [lindex $var $i] - LockCrosshairCurrent + CrosshairCmdLock [lindex $var $i] } default { set x [lindex $var [expr $i+0]] @@ -299,6 +298,7 @@ proc ProcessCrosshairCmd {varname iname} { proc CrosshairCmdLock {sys} { global crosshair + set crosshair(lock) $sys LockCrosshairCurrent } |