diff options
author | William Joye <wjoye@cfa.harvard.edu> | 2018-08-07 19:37:43 (GMT) |
---|---|---|
committer | William Joye <wjoye@cfa.harvard.edu> | 2018-08-07 19:37:43 (GMT) |
commit | bef96448086f76151cf5cc207cc9a98d58f8dc8f (patch) | |
tree | e5a6e2cb0021f421c7945b4928ef723617d7a527 | |
parent | 01952508444434a9bde013b5c972ace97e0ed31a (diff) | |
download | blt-bef96448086f76151cf5cc207cc9a98d58f8dc8f.zip blt-bef96448086f76151cf5cc207cc9a98d58f8dc8f.tar.gz blt-bef96448086f76151cf5cc207cc9a98d58f8dc8f.tar.bz2 |
update sia list
-rw-r--r-- | ds9/library/coord.tcl | 1 | ||||
-rw-r--r-- | ds9/library/sia.tcl | 12 |
2 files changed, 1 insertions, 12 deletions
diff --git a/ds9/library/coord.tcl b/ds9/library/coord.tcl index 80d519e..7e569c9 100644 --- a/ds9/library/coord.tcl +++ b/ds9/library/coord.tcl @@ -117,6 +117,7 @@ proc DisplayCoordDialog {which x y} { foreach l {{} a b c d e f g h i j k l m n o p q r s t u v w x y z} { if {"$pcoord(wcs$l)" && [$which has wcs "wcs$l"]} { set cd "[$which get coordinates $x $y wcs$l $wcs(sky) $wcs(skyformat)]" + puts ":$cd:" if {[$which has wcs celestial "wcs$l"]} { append r " [lindex $cd 0] [lindex $cd 1] $wcs(sky)" diff --git a/ds9/library/sia.tcl b/ds9/library/sia.tcl index a07c4be..5936aae 100644 --- a/ds9/library/sia.tcl +++ b/ds9/library/sia.tcl @@ -76,18 +76,6 @@ proc SIADef {} { post \ } \ } - -# {{NASA/CXC Chandra} \ -# siacxc \ -# {http://cda.harvard.edu/cxcsiap/queryImages}\ -# {} \ -# post \ -# } \ -# {{MPE/MPG ROSAT} siarosat \ -# {http://gavo.mpe.mpg.de/rosat/SIAP} \ -# {action=queryImage&siap=siap.service.rosat&} \ -# get \ -# } \ } proc SIAAnalysisMenu {mb} { |