From 11f7435b1ce77373d5e6254cf69cd762bb02ff61 Mon Sep 17 00:00:00 2001 From: Tony Garnock-Jones Date: Thu, 27 Oct 2011 15:53:00 -0400 Subject: [PATCH] Remove obsolete default-valued parameter --- repl-server.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/repl-server.rkt b/repl-server.rkt index c0a28fe..3a7d683 100644 --- a/repl-server.rkt +++ b/repl-server.rkt @@ -98,7 +98,7 @@ (close-output-port out))) (define (t-server) - (define s (tcp-listen 2322 4)) + (define s (tcp-listen 2322)) (printf "Accepting...\n") (tcp-pty-ssh-server s repl-shell #:prompt *prompt*))