jimmy/postgrest
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Merge pull request #152 from brikou/expose_location_header

Browse Source 
Add 'Location' to exposed headers
This commit is contained in:
Joe Nelson
2015-02-18 08:41:00 -08:00
parent 337b49f386 a93e6c050d
commit 328f27e7bd
2 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Config.hs
+1 -1
View File
@@ -47,7 +47,7 @@ corsPolicy req = case lookup "origin" headers of
, corsRequestHeaders = "Authentication":accHeaders , corsRequestHeaders = "Authentication":accHeaders
, corsExposedHeaders = Just [ , corsExposedHeaders = Just [
"Content-Encoding", "Content-Location", "Content-Range", "Content-Type" "Content-Encoding", "Content-Location", "Content-Range", "Content-Type"
, "Date", "Server", "Transfer-Encoding", "Range-Unit" , "Date", "Location", "Server", "Transfer-Encoding", "Range-Unit"
] ]
} }
Nothing -> Nothing Nothing -> Nothing
test/Feature/CorsSpec.hs
+1 -1
View File
@@ -59,7 +59,7 @@ spec = around withApp $ describe "CORS" $ do
liftIO $ simpleHeaders r `shouldSatisfy` matchHeader liftIO $ simpleHeaders r `shouldSatisfy` matchHeader
"Access-Control-Expose-Headers" "Access-Control-Expose-Headers"
"Content-Encoding, Content-Location, Content-Range, Content-Type, \ "Content-Encoding, Content-Location, Content-Range, Content-Type, \
\Date, Server, Transfer-Encoding, Range-Unit" \Date, Location, Server, Transfer-Encoding, Range-Unit"
describe "postflight request" $ describe "postflight request" $
it "allows INFO body through even with CORS request headers present" $ do it "allows INFO body through even with CORS request headers present" $ do