[project @ 2002-09-25 15:24:07 by simonmar]

[haskell-directory.git] / cbits / inputReady.c

diff --git a/cbits/inputReady.c b/cbits/inputReady.c
index 5b1e005..8677f26 100644 (file)
--- a/cbits/inputReady.c
+++ b/cbits/inputReady.c
@@ -50,11 +50,10 @@ inputReady(int fd, int msecs, int isSock)
        DWORD rc;
        HANDLE hFile = (HANDLE)_get_osfhandle(fd);
        
-       rc = MsgWaitForMultipleObjects( 1,
-                                       &hFile,
-                                       FALSE, /* wait all */
-                                       msecs, /*millisecs*/
-                                       QS_ALLEVENTS);
+       rc = WaitForMultipleObjects( 1,
+                                    &hFile,
+                                    TRUE,   /* wait all */
+                                    msecs); /*millisecs*/
        
        /* 1 => Input ready, 0 => not ready, -1 => error */
        switch (rc) {