on master help sign in
Fixed warnings
6b76a6bMichael Snoyman
Network/Wai/Handler/DevelServer.hs−1
@@ -16,7 +16,6 @@ import Control.Exception (bracket, finally, Exception,
16import qualified Control.Exception as E
16import qualified Control.Exception as E
17import System.IO (Handle, hClose)
17import System.IO (Handle, hClose)
18import Control.Concurrent (forkIO, threadDelay)
18import Control.Concurrent (forkIO, threadDelay)
19−import Control.Monad (forM)
20
19
21import qualified Control.Concurrent.MVar as M
20import qualified Control.Concurrent.MVar as M
22import qualified Control.Concurrent.Chan as C
21import qualified Control.Concurrent.Chan as C
wai-handler-devel.hs+1−1
@@ -17,7 +17,7 @@ main = do
17 , moduleName = "" &= argPos 1 &= typ "MODULE"
17 , moduleName = "" &= argPos 1 &= typ "MODULE"
18 , function = "" &= argPos 2 &= typ "FUNCTION"
18 , function = "" &= argPos 2 &= typ "FUNCTION"
19 } &= summary "WAI development web server"
19 } &= summary "WAI development web server"
20− forkIO $ run p m f
20+ _ <- forkIO $ run p m f
21 go
21 go
22 where
22 where
23 go = do
23 go = do