diff --git a/servant-server/src/Servant/Server/Internal.hs b/servant-server/src/Servant/Server/Internal.hs index e696df70..1bdf9703 100644 --- a/servant-server/src/Servant/Server/Internal.hs +++ b/servant-server/src/Servant/Server/Internal.hs @@ -70,8 +70,9 @@ import Network.Socket import Network.Wai (Application, Request, RequestBodyLength (KnownLength), httpVersion, isSecure, lazyRequestBody, - queryString, remoteHost, getRequestBodyChunk, requestHeaders, - requestMethod, responseLBS, responseStream, vault) + queryString, remoteHost, getRequestBodyChunk, + requestBodyLength, requestHeaders, requestMethod, responseLBS, + responseStream, vault) import Prelude () import Prelude.Compat import Servant.API