diff options
author | William Joye <wjoye@cfa.harvard.edu> | 2017-07-20 16:06:37 (GMT) |
---|---|---|
committer | William Joye <wjoye@cfa.harvard.edu> | 2017-07-20 16:06:37 (GMT) |
commit | 8ea9679dc1e494ac15f3348fae962a1069362e31 (patch) | |
tree | b66f999948d4e1c86fabd2ce666144a3ee89da3a /ds9/library/command.tcl | |
parent | aa656315a02bbd472190442759c690ef7dc4feaf (diff) | |
download | blt-8ea9679dc1e494ac15f3348fae962a1069362e31.zip blt-8ea9679dc1e494ac15f3348fae962a1069362e31.tar.gz blt-8ea9679dc1e494ac15f3348fae962a1069362e31.tar.bz2 |
update parser
Diffstat (limited to 'ds9/library/command.tcl')
-rw-r--r-- | ds9/library/command.tcl | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/ds9/library/command.tcl b/ds9/library/command.tcl index c64b742..1ea681d 100644 --- a/ds9/library/command.tcl +++ b/ds9/library/command.tcl @@ -57,7 +57,7 @@ proc ds9Cmd {argv} { } proc ProcessCommand {argv argc} { - if {1} { + if {0} { YY_FLUSH_BUFFER yy_scan_string $argv @@ -473,17 +473,17 @@ proc ProcessCommand {argv argc} { switch $ds9(wm) { x11 - - aqua {CommandLineLoad $item argv i} + aqua {CommandLineLoad $item} win32 { # if win32 and envoked via DOS shell # we must expand wildcards ourselves if {[catch {glob $item} fns]} { # cygwin/double click/DOS Shell no wildcards - CommandLineLoad $item argv i + CommandLineLoad $item } else { # DOS Shell with wildcards foreach fn $fns { - CommandLineLoad $fn argv i + CommandLineLoad $fn } } } |