From 2a884140458c2f4ed271dd5b6fb74502db4653be Mon Sep 17 00:00:00 2001
From: William Joye <wjoye@cfa.harvard.edu>
Date: Mon, 11 Jun 2018 17:36:01 -0400
Subject: fix sia cone search radius issue

---
 ds9/library/siadialog.tcl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ds9/library/siadialog.tcl b/ds9/library/siadialog.tcl
index 6d7bf58..6821639 100644
--- a/ds9/library/siadialog.tcl
+++ b/ds9/library/siadialog.tcl
@@ -468,7 +468,7 @@ proc SIAVOT1 {varname} {
     }
 
     # now to radius
-    set rr [expr sqrt($ww*$ww+$hh*$hh)/2.]
+    set rr [expr ($ww+$hh)/2.]
 
     # query
     set var(query2) "$var(opts)[http::formatQuery POS "$xx,$yy" SIZE $rr FORMAT image/fits]"
-- 
cgit v0.12