Index: /trunk/source/level-1/linux-files.lisp
===================================================================
--- /trunk/source/level-1/linux-files.lisp	(revision 8486)
+++ /trunk/source/level-1/linux-files.lisp	(revision 8487)
@@ -890,5 +890,5 @@
         (return))
       (when in-fd
-        (when (fd-input-available-p in-fd 0)
+        (when (fd-input-available-p in-fd 1000)
           (%stack-block ((buf 1024))
             (let* ((n (fd-read in-fd buf 1024)))