diff --git a/1991.fs b/1991.fs
index 8ea2273..071b4e8 100644
--- a/1991.fs
+++ b/1991.fs
@@ -464,6 +464,7 @@ s" image/x-icon" filetype: ico
     either-resolve or-404 ;
 
 : start-server { server client }
+    30000000 set-socket-timeout
     begin
         server 255 listen
         server accept-socket to client