summaryrefslogtreecommitdiffstats
path: root/ds9/library/mask.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'ds9/library/mask.tcl')
-rw-r--r--ds9/library/mask.tcl12
1 files changed, 6 insertions, 6 deletions
diff --git a/ds9/library/mask.tcl b/ds9/library/mask.tcl
index 8775abe..58036b4 100644
--- a/ds9/library/mask.tcl
+++ b/ds9/library/mask.tcl
@@ -273,12 +273,12 @@ proc ProcessMaskCmd {varname iname} {
}
proc ProcessSendMaskCmd {proc id param {sock {}} {fn {}}} {
- global mask
+ global parse
+ set parse(proc) $proc
+ set parse(id) $id
- switch -- [string tolower $param] {
- color {$proc $id "$mask(color)\n"}
- mark {$proc $id "$mask(mark)\n"}
- transparency {$proc $id "$mask(transparency)\n"}
- }
+ masksend::YY_FLUSH_BUFFER
+ masksend::yy_scan_string $param
+ masksend::yyparse
}