diff options
author | William Joye <wjoye@cfa.harvard.edu> | 2018-06-06 15:35:39 (GMT) |
---|---|---|
committer | William Joye <wjoye@cfa.harvard.edu> | 2018-06-06 15:35:39 (GMT) |
commit | a03f2552f6d9f20d602fc82b139d46fb059c85db (patch) | |
tree | b6d2f35b0f740c02d520d789d643128f1c526ed9 /ds9/library/2mass.tcl | |
parent | 5e379797126ae52c57fa5fb8e8d3984e6a0a359e (diff) | |
download | blt-a03f2552f6d9f20d602fc82b139d46fb059c85db.zip blt-a03f2552f6d9f20d602fc82b139d46fb059c85db.tar.gz blt-a03f2552f6d9f20d602fc82b139d46fb059c85db.tar.bz2 |
add ds9 2mass send parser
Diffstat (limited to 'ds9/library/2mass.tcl')
-rw-r--r-- | ds9/library/2mass.tcl | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/ds9/library/2mass.tcl b/ds9/library/2mass.tcl index 36158ea..e8697ac 100644 --- a/ds9/library/2mass.tcl +++ b/ds9/library/2mass.tcl @@ -141,5 +141,12 @@ proc Process2MASSCmd {varname iname} { proc ProcessSend2MASSCmd {proc id param {sock {}} {fn {}}} { 2MASSDialog - IMGSVRProcessSendCmd $proc $id $param dtwomass + + global parse + set parse(proc) $proc + set parse(id) $id + + twomasssend::YY_FLUSH_BUFFER + twomasssend::yy_scan_string $param + twomasssend::yyparse } |