on master help sign in
Minor cleanups, still have an orphan instance
commit7cb4492ba28436021f7ddc1a9502a10bf4a83219 authorMichael Snoyman <michael@snoyman.com> dateTue 1 Feb 2011, 07:45 (16 years ago) parent654ae5b
2 files changed+1−9
Network/Wai/Handler/DevelServer.hs+1−8 wai-handler-devel.hs−1
Network/Wai/Handler/DevelServer.hs+1−8
@@ -15,17 +15,10 @@ import Network.Wai
1515import Data.Text.Lazy (pack)
1616import Data.Text.Lazy.Encoding (encodeUtf8)
1717import qualified Data.ByteString.Lazy.Char8 as L8
18−import Network
19− ( listenOn, accept, sClose, PortID(PortNumber), Socket
20− , withSocketsDo)
21−import Control.Exception (bracket, finally, Exception,
22− SomeException, toException)
18+import Control.Exception (Exception, SomeException, toException)
2319import qualified Control.Exception as E
24−import System.IO (Handle, hClose)
2520import Control.Concurrent (forkIO, threadDelay)
2621
27−import qualified Control.Concurrent.MVar as M
28−import qualified Control.Concurrent.Chan as C
2922import System.Directory (getModificationTime)
3023import qualified Network.Wai.Handler.Warp as Warp
3124import Network.Wai.Application.Devel
wai-handler-devel.hs−1
@@ -1,7 +1,6 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22import Network.Wai.Handler.DevelServer (runQuit)
33import System.Console.CmdArgs
4−import Control.Concurrent (forkIO)
54
65data Devel = Devel
76 { port :: Int