git.iko.soy/typeable/wai
on master help sign in
stop using non blocking for files.
394024dKazu Yamamoto
warp/Network/Wai/Handler/Warp/FdCache.hs+1−1
compare with master
unifiedsplit
@@ -72,7 +72,7 @@ inactive (MutableStatus ref) = writeIORef ref Inactive
72data FdEntry = FdEntry !FilePath !Fd !MutableStatus
72data FdEntry = FdEntry !FilePath !Fd !MutableStatus
73
73
74openFile :: FilePath -> IO Fd
74openFile :: FilePath -> IO Fd
75−openFile path = openFd path ReadOnly Nothing defaultFileFlags{nonBlock=True}
75+openFile path = openFd path ReadOnly Nothing defaultFileFlags{nonBlock=False}
76
76
77closeFile :: Fd -> IO ()
77closeFile :: Fd -> IO ()
78closeFile = closeFd
78closeFile = closeFd