summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorWilliam Joye <wjoye@cfa.harvard.edu>2018-08-02 20:11:28 (GMT)
committerWilliam Joye <wjoye@cfa.harvard.edu>2018-08-02 20:11:28 (GMT)
commit6aeb5eef486ea7bf280a71fce9357a5e5ec813ac (patch)
tree8e95ab9a570e7667e5a9d10606ea043d16706a4e
parentf2d872a68438cbd688be92dc97b3c310635e8f81 (diff)
downloadblt-6aeb5eef486ea7bf280a71fce9357a5e5ec813ac.zip
blt-6aeb5eef486ea7bf280a71fce9357a5e5ec813ac.tar.gz
blt-6aeb5eef486ea7bf280a71fce9357a5e5ec813ac.tar.bz2
clean up code
-rw-r--r--ds9/library/info.tcl8
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"