diff options
| author | William Joye <wjoye@cfa.harvard.edu> | 2018-06-06 19:25:14 (GMT) |
|---|---|---|
| committer | William Joye <wjoye@cfa.harvard.edu> | 2018-06-06 19:25:14 (GMT) |
| commit | 7254c63954b7246c72af5beac2a609326d82e460 (patch) | |
| tree | 7381a189d4472f758f91755d6b3cd4c2881eaee4 /ds9/library/nameres.tcl | |
| parent | d6a7d78054f06d12afb20cedd3879a9f5c66fdcd (diff) | |
| download | blt-7254c63954b7246c72af5beac2a609326d82e460.zip blt-7254c63954b7246c72af5beac2a609326d82e460.tar.gz blt-7254c63954b7246c72af5beac2a609326d82e460.tar.bz2 | |
update ds9 parsers
Diffstat (limited to 'ds9/library/nameres.tcl')
| -rw-r--r-- | ds9/library/nameres.tcl | 11 |
1 files changed, 0 insertions, 11 deletions
diff --git a/ds9/library/nameres.tcl b/ds9/library/nameres.tcl index 63fc3c8..5c5c2c6 100644 --- a/ds9/library/nameres.tcl +++ b/ds9/library/nameres.tcl @@ -186,23 +186,12 @@ proc ProcessNRESCmd {varname iname} { NRESDialog - global cvarname - set cvarname dnres - nres::YY_FLUSH_BUFFER nres::yy_scan_string [lrange $var $i end] nres::yyparse incr i [expr $nres::yycnt-1] } -proc NRESCmdName {value} { - global cvarname - upvar #0 $cvarname cvar - - set cvar(name) $value - NRESApply $cvarname 1 -} - proc ProcessSendNRESCmd {proc id param {sock {}} {fn {}}} { global nres global pnres |