aboutsummaryrefslogtreecommitdiff
path: root/src/interp/server.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/server.boot')
-rw-r--r--src/interp/server.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/server.boot b/src/interp/server.boot
index 6206169e..e989fe80 100644
--- a/src/interp/server.boot
+++ b/src/interp/server.boot
@@ -90,7 +90,7 @@ serverReadLine(stream) ==
stringBuf := sockGetString $MenuServer
CATCH('coerceFailure,CATCH($intTopLevel, CATCH($SpadReaderTag,
parseAndInterpret stringBuf)))
- not $leanMode and printPrompt "andFlush"
+ not $leanMode and printPrompt()
action = $NonSmanSession =>
$SpadServer := nil
action = $KillLispSystem =>