Add commit: 78a225c

 Changes to be committed:
	modified:   src/interp/server.boot
	modified:   src/sman/session.c

Author: gvanuxem

src/interp/server.boot

@@ -94,8 +94,8 @@ serverReadLine(stream) ==
       sockSendInt($SessionManager, $CreateFrameAnswer)
       sockSendInt($SessionManager, $frameNumber)
       $frameNumber := $frameNumber + 1
---  MRX I'm not sure whether I should call ioHook("startPrompt")/ioHook("endOfPrompt") here
-      sockSendString($SessionManager, MKPROMPT())
+      princPrompt()
+      FORCE_-OUTPUT()
     action = $SwitchFrames =>
       $currentFrameNum := sockGetInt($SessionManager)
       currentFrame := LASSOC($currentFrameNum, $frameAlist)

src/sman/session.c

@@ -344,11 +344,6 @@ accept_session_connection(Sock *server_sock)
       }
       plSock->Socket.frame = get_int(spad_server);
       active_session = (Sock *)plSock;
-      get_string_buf(spad_server, big_bad_buf, BufSize);
-      ret_code = swrite((Sock *)plSock, big_bad_buf, strlen(big_bad_buf)+1,
-                        "session: writing to InterpWindow");
-      if (ret_code == -1)
-        return -1;
       num_active_clients++;
 #ifdef DEBUG
 pr();