summaryrefslogtreecommitdiffstats
path: root/ds9/library/catsimbad.tcl
diff options
context:
space:
mode:
authorWilliam Joye <wjoye@cfa.harvard.edu>2018-06-12 21:07:26 (GMT)
committerWilliam Joye <wjoye@cfa.harvard.edu>2018-06-12 21:07:26 (GMT)
commitc603e045890f38b2c64bac190e934800355bc771 (patch)
tree2e32265ebdfb8012a46694f38b450fadf0cd88cf /ds9/library/catsimbad.tcl
parent2a884140458c2f4ed271dd5b6fb74502db4653be (diff)
downloadblt-c603e045890f38b2c64bac190e934800355bc771.zip
blt-c603e045890f38b2c64bac190e934800355bc771.tar.gz
blt-c603e045890f38b2c64bac190e934800355bc771.tar.bz2
catalog: use cone search radius instead of width/height
Diffstat (limited to 'ds9/library/catsimbad.tcl')
-rw-r--r--ds9/library/catsimbad.tcl4
1 files changed, 1 insertions, 3 deletions
diff --git a/ds9/library/catsimbad.tcl b/ds9/library/catsimbad.tcl
index 85dda66..7efeda3 100644
--- a/ds9/library/catsimbad.tcl
+++ b/ds9/library/catsimbad.tcl
@@ -74,9 +74,7 @@ proc CATSIMBAD {varname} {
append qq "$yy"
}
- set ww $var(width)
- set hh $var(height)
- set rr [expr ($ww+$hh)/2.]
+ set rr $var(radius)
append qq " radius=$rr"
switch -- $var(rformat) {