summaryrefslogtreecommitdiffstats
path: root/ds9/library/cat.tcl
diff options
context:
space:
mode:
authorWilliam Joye <wjoye@cfa.harvard.edu>2017-07-18 18:55:46 (GMT)
committerWilliam Joye <wjoye@cfa.harvard.edu>2017-07-18 18:55:46 (GMT)
commitd9c990f6cbb098e1e43ca0e1414597ef869a3cf0 (patch)
treeeda1e29676202f9a7cc8eec45c15839b2063a9b0 /ds9/library/cat.tcl
parentcbbbe7fc0b87fc12e2e8525ab7173bbaaa679e12 (diff)
downloadblt-d9c990f6cbb098e1e43ca0e1414597ef869a3cf0.zip
blt-d9c990f6cbb098e1e43ca0e1414597ef869a3cf0.tar.gz
blt-d9c990f6cbb098e1e43ca0e1414597ef869a3cf0.tar.bz2
update parser
Diffstat (limited to 'ds9/library/cat.tcl')
-rw-r--r--ds9/library/cat.tcl5
1 files changed, 5 insertions, 0 deletions
diff --git a/ds9/library/cat.tcl b/ds9/library/cat.tcl
index 89b25f2..0bd1961 100644
--- a/ds9/library/cat.tcl
+++ b/ds9/library/cat.tcl
@@ -1253,6 +1253,11 @@ proc CatalogRefCmd {ref} {
global icat
global cvarname
+ # backward compatibility
+ if {$ref == "cxc"} {
+ set ref csc
+ }
+
# look for reference in current list
if {[lsearch $icat(cats) cat${ref}] < 0} {
# see if its from our list of cats