@@ -11,7 +11,6 @@ import Data.List (isInfixOf)
11import qualified Data.ByteString.Char8 as S8
11import qualified Data.ByteString.Char8 as S8
12-- import qualified Data.ByteString.Lazy.Char8 as L8
12-- import qualified Data.ByteString.Lazy.Char8 as L8
13import qualified Data.Text as T
13import qualified Data.Text as T
14−import qualified Data.Text.Encoding as TE
15import System.PosixCompat.Files (getFileStatus, modificationTime)
14import System.PosixCompat.Files (getFileStatus, modificationTime)
17import Network.HTTP.Date
16import Network.HTTP.Date
@@ -21,10 +20,7 @@ import Network.HTTP.Date
21import Network.Wai
20import Network.Wai
22import Network.Wai.Test
21import Network.Wai.Test
24−import Network.Socket.Internal as Sock
25−import qualified Network.HTTP.Types as H
26import Control.Monad.IO.Class (liftIO)
23import Control.Monad.IO.Class (liftIO)
27−import Data.Monoid (mempty)
29defRequest :: Request
25defRequest :: Request
30defRequest = defaultRequest
26defRequest = defaultRequest