diff --git a/src/Main.hs b/src/Main.hs index 2638b34dc..300a6b839 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -35,14 +35,14 @@ argParser = AppConfig defaultCorsPolicy :: CorsResourcePolicy defaultCorsPolicy = CorsResourcePolicy Nothing - ["GET", "POST", "PUT", "PATCH", "DELETE"] ["authorization"] Nothing + ["GET", "POST", "PUT", "PATCH", "DELETE", "OPTIONS"] ["Authorization"] Nothing (Just $ 60*60*24) False False True corsPolicy :: Request -> Maybe CorsResourcePolicy corsPolicy req = case lookup "origin" headers of Just origin -> Just defaultCorsPolicy { corsOrigins = Just ([origin], True), - corsRequestHeaders = "authentication":accHeaders + corsRequestHeaders = "Authentication":accHeaders } Nothing -> Nothing where