diff --git a/lib/chibi/net/server.scm b/lib/chibi/net/server.scm index 3f4df3a3..48bce643 100644 --- a/lib/chibi/net/server.scm +++ b/lib/chibi/net/server.scm @@ -48,6 +48,7 @@ (close-output-port (cdr ports)) (close-file-descriptor sock))) (handler (car ports) (cdr ports) sock addr) + (flush-output (cdr ports)) (close-input-port (car ports)) (close-output-port (cdr ports)) (close-file-descriptor sock)))