From 30340b5b111db5d9a4fb2091484dd3de25dbb4ae Mon Sep 17 00:00:00 2001 From: aaron levin Date: Tue, 18 Aug 2015 16:18:09 -0400 Subject: [PATCH] Fix warnings --- servant-server/src/Servant/Server/Internal.hs | 1 - .../src/Servant/Server/Internal/RoutingApplication.hs | 2 +- 2 files changed, 1 insertion(+), 2 deletions(-) diff --git a/servant-server/src/Servant/Server/Internal.hs b/servant-server/src/Servant/Server/Internal.hs index b2ad3427..5a03497e 100644 --- a/servant-server/src/Servant/Server/Internal.hs +++ b/servant-server/src/Servant/Server/Internal.hs @@ -30,7 +30,6 @@ import qualified Data.ByteString as B import qualified Data.ByteString.Lazy as BL import qualified Data.Map as M import qualified Data.ByteString as B -import Data.ByteString.Base64 (decodeLenient) import qualified Data.ByteString.Lazy as BL import qualified Data.Map as M import Data.Maybe (mapMaybe, fromMaybe) diff --git a/servant-server/src/Servant/Server/Internal/RoutingApplication.hs b/servant-server/src/Servant/Server/Internal/RoutingApplication.hs index 3e857e28..bdc16f8a 100644 --- a/servant-server/src/Servant/Server/Internal/RoutingApplication.hs +++ b/servant-server/src/Servant/Server/Internal/RoutingApplication.hs @@ -16,7 +16,7 @@ import Data.IORef (newIORef, readIORef, import Data.Maybe (fromMaybe) import Data.Monoid ((<>)) import Data.String (fromString) -import Network.HTTP.Types hiding (Header, ResponseHeaders) +import Network.HTTP.Types hiding (ResponseHeaders) import Network.Wai (Application, Request, Response, ResponseReceived, requestBody, responseLBS,