diff --git a/repl-server.rkt b/repl-server.rkt index 916df5b..1e08032 100644 --- a/repl-server.rkt +++ b/repl-server.rkt @@ -103,7 +103,7 @@ (close-output-port out))) (define (t-server) - (define s (tcp-listen 2322)) + (define s (tcp-listen 2322 4 #t)) (printf "Accepting...\n") (tcp-pty-ssh-server s repl-shell #:prompt *prompt*))