fix the missing status400 include
This commit is contained in:
@@ -11,7 +11,7 @@ import qualified Hasql as H
|
|||||||
import qualified Hasql.Postgres as P
|
import qualified Hasql.Postgres as P
|
||||||
|
|
||||||
import Network.HTTP.Types.Header (hAccept, hAuthorization)
|
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,
|
import Network.Wai (Application, Request (..), Response,
|
||||||
requestHeaders, responseLBS)
|
requestHeaders, responseLBS)
|
||||||
import Network.Wai.Middleware.Cors (cors)
|
import Network.Wai.Middleware.Cors (cors)
|
||||||
|
|||||||
Reference in New Issue
Block a user