diff options
| author | William Joye <wjoye@cfa.harvard.edu> | 2018-08-02 20:11:28 (GMT) |
|---|---|---|
| committer | William Joye <wjoye@cfa.harvard.edu> | 2018-08-02 20:11:28 (GMT) |
| commit | 6aeb5eef486ea7bf280a71fce9357a5e5ec813ac (patch) | |
| tree | 8e95ab9a570e7667e5a9d10606ea043d16706a4e | |
| parent | f2d872a68438cbd688be92dc97b3c310635e8f81 (diff) | |
| download | blt-6aeb5eef486ea7bf280a71fce9357a5e5ec813ac.zip blt-6aeb5eef486ea7bf280a71fce9357a5e5ec813ac.tar.gz blt-6aeb5eef486ea7bf280a71fce9357a5e5ec813ac.tar.bz2 | |
clean up code
| -rw-r--r-- | ds9/library/info.tcl | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/ds9/library/info.tcl b/ds9/library/info.tcl index 17a82c5..d44686a 100644 --- a/ds9/library/info.tcl +++ b/ds9/library/info.tcl @@ -580,14 +580,6 @@ proc UpdateInfoBox {which x y sys} { -font "$ds9(times) $fsz" } } - } elseif {[$which has wcs celestial wcs$ll]} { - if {$infobox(wcs$ll,sys) == {}} { - set infobox(wcs$ll,sys) "WCS $ll" - } - $infobox(wcs$ll,x,nm) configure -text {l} \ - -font "{$ds9(times)} $pds9(font,size) normal italic" - $infobox(wcs$ll,y,nm) configure -text {b} \ - -font "{$ds9(times)} $pds9(font,size) normal italic" } else { if {$infobox(wcs$ll,sys) == {}} { set infobox(wcs$ll,sys) "WCS $ll" |