fix the missing status400 include

This commit is contained in:
Ruslan Talpa
2015-11-12 15:19:11 +02:00
parent eb94c507f9
commit 6e9a28ba3c
+1 -1
View File
@@ -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)