diff options
Diffstat (limited to 'src/interp/i-syscmd.boot')
-rw-r--r-- | src/interp/i-syscmd.boot | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/src/interp/i-syscmd.boot b/src/interp/i-syscmd.boot index 81fee035..d1674279 100644 --- a/src/interp/i-syscmd.boot +++ b/src/interp/i-syscmd.boot @@ -3139,11 +3139,11 @@ handleNoParseCommands(unab, string) == npsynonym(unab, (null spaceIndex => '""; SUBSEQ(string, spaceIndex+1))) null spaceIndex => FUNCALL unab - member(unab, '( quit _ - fin _ - pquit _ - credits _ - copyright )) => + unab in '( quit _ + fin _ + pquit _ + credits _ + copyright ) => sayKeyedMsg("S2IV0005", NIL) nil funName := INTERN strconc('"np",STRING unab) |