diff options
Diffstat (limited to 'ds9/library/load.tcl')
| -rw-r--r-- | ds9/library/load.tcl | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/ds9/library/load.tcl b/ds9/library/load.tcl index 22d76b6..f07f405 100644 --- a/ds9/library/load.tcl +++ b/ds9/library/load.tcl @@ -421,6 +421,15 @@ proc ProcessPreserveCmd {varname iname} { } proc ProcessSendPreserveCmd {proc id param {sock {}} {fn {}}} { + global parse + set parse(proc) $proc + set parse(id) $id + + preservesend::YY_FLUSH_BUFFER + preservesend::yy_scan_string $param + preservesend::yyparse + return + global scale global panzoom global marker |