summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorWilliam Joye <wjoye@cfa.harvard.edu>2018-05-16 19:45:02 (GMT)
committerWilliam Joye <wjoye@cfa.harvard.edu>2018-05-16 19:45:02 (GMT)
commit875f24c44180d9107146559ab37d0fb73298ffb0 (patch)
tree1801fc6dbcf2a5b939293adf7804ce6dc8fbcc99
parent69280a97cb244e095dc9598a80fb97ed8dddd389 (diff)
downloadblt-875f24c44180d9107146559ab37d0fb73298ffb0.zip
blt-875f24c44180d9107146559ab37d0fb73298ffb0.tar.gz
blt-875f24c44180d9107146559ab37d0fb73298ffb0.tar.bz2
update ds9 parsers
-rw-r--r--ds9/library/colorbar.tcl4
-rw-r--r--ds9/parsers/cmapparser.tac2
-rw-r--r--ds9/parsers/colorbarparser.tac2
3 files changed, 4 insertions, 4 deletions
diff --git a/ds9/library/colorbar.tcl b/ds9/library/colorbar.tcl
index ecbde24..f23bdd5 100644
--- a/ds9/library/colorbar.tcl
+++ b/ds9/library/colorbar.tcl
@@ -1357,6 +1357,7 @@ proc ProcessSendCmapCmd {proc id param} {
file {$proc $id "[$current(colorbar) get file name]\n"}
invert {$proc $id [ToYesNo $colorbar(invert)]}
value {$proc $id "[$current(colorbar) get contrast] [$current(colorbar) get bias]\n"}
+ # backward compatibility
lock {$proc $id [ToYesNo $colorbar(lock)]}
{} {$proc $id "[$current(colorbar) get name]\n"}
}
@@ -1381,11 +1382,9 @@ proc ProcessColorbarCmd {varname iname} {
switch -- $item {
match {
- # backward compatibility
MatchColorCurrent
}
lock {
- # backward compatibility
incr i
if {!([string range [lindex $var $i] 0 0] == "-")} {
set colorbar(lock) [FromYesNo [lindex $var $i]]
@@ -1529,7 +1528,6 @@ proc ProcessSendColorbarCmd {proc id param} {
switch -- [string tolower [lindex $param 0]] {
lock {
- #backward compatibility
$proc $id [ToYesNo $colorbar(lock)]
}
orientation {$proc $id "$colorbar(orientation)\n"}
diff --git a/ds9/parsers/cmapparser.tac b/ds9/parsers/cmapparser.tac
index 4286f0e..b5b85a7 100644
--- a/ds9/parsers/cmapparser.tac
+++ b/ds9/parsers/cmapparser.tac
@@ -32,7 +32,9 @@ cmap : STRING_ {CmapCmd $1}
| OPEN_ {ColormapDialog}
| CLOSE_ {ColormapDestroyDialog}
+# backward compatibility
| MATCH_ {MatchColorCurrent}
+# backward compatibility
| LOCK_ yesno {ColorbarCmdSet lock $2 LockColorCurrent}
| LOAD_ cmapLoad
diff --git a/ds9/parsers/colorbarparser.tac b/ds9/parsers/colorbarparser.tac
index be54253..632484c 100644
--- a/ds9/parsers/colorbarparser.tac
+++ b/ds9/parsers/colorbarparser.tac
@@ -31,7 +31,6 @@ command : colorbar
;
colorbar : yesno {ViewCmdSet colorbar $1 UpdateView}
-# backward compatibility
| MATCH_ {MatchColorCurrent}
| LOCK_ yesno {ColorbarCmdSet lock $2 LockColorCurrent}
@@ -41,6 +40,7 @@ colorbar : yesno {ViewCmdSet colorbar $1 UpdateView}
| FONTSIZE_ INT_ {ColorbarCmdSet font,size $2 UpdateView}
| FONTWEIGHT_ fontWeight {ColorbarCmdSet font,weight $2 UpdateView}
| FONTSLANT_ fontSlant {ColorbarCmdSet font,slant $2 UpdateView}
+# backward compatibility
| FONTSTYLE_ fontStyle {ColorbarCmdFontStyle $2 UpdateView}
| orientation {ColorbarCmdSet orientation $1 UpdateView}