@@ -11,7 +11,6 @@ import Data.List (isInfixOf)
1111import qualified Data.ByteString.Char8 as S8
1212-- import qualified Data.ByteString.Lazy.Char8 as L8
1313import qualified Data.Text as T
14−import qualified Data.Text.Encoding as TE
1514import System.PosixCompat.Files (getFileStatus, modificationTime)
1615
1716import Network.HTTP.Date
@@ -21,10 +20,7 @@ import Network.HTTP.Date
2120import Network.Wai
2221import Network.Wai.Test
2322
24−import Network.Socket.Internal as Sock
25−import qualified Network.HTTP.Types as H
2623import Control.Monad.IO.Class (liftIO)
27−import Data.Monoid (mempty)
2824
2925defRequest :: Request
3026defRequest = defaultRequest