From 6e9a28ba3ce7f9a5f13f14bb95b95e211b05dd7c Mon Sep 17 00:00:00 2001 From: Ruslan Talpa Date: Thu, 12 Nov 2015 15:19:11 +0200 Subject: [PATCH] fix the missing status400 include --- src/PostgREST/Middleware.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/PostgREST/Middleware.hs b/src/PostgREST/Middleware.hs index ff8a434b6..3144bc84f 100644 --- a/src/PostgREST/Middleware.hs +++ b/src/PostgREST/Middleware.hs @@ -11,7 +11,7 @@ import qualified Hasql as H import qualified Hasql.Postgres as P import Network.HTTP.Types.Header (hAccept, hAuthorization) -import Network.HTTP.Types.Status (status415) +import Network.HTTP.Types.Status (status415, status400) import Network.Wai (Application, Request (..), Response, requestHeaders, responseLBS) import Network.Wai.Middleware.Cors (cors)