on master help sign in
Merge pull request #408 from mschristiansen/secure

Add X-Forwarded-Proto to appearsSecure.

commitab43a2cb7af63d1f16f1dceed8faaa41c669a099 authorChristopher Reichert <creichert07@gmail.com> dateTue 28 Jul 2015, 02:08 (11 years ago) parentf3704375a4e6e8
1 file changed+1
wai-extra/Network/Wai/Request.hs+1
wai-extra/Network/Wai/Request.hs+1
@@ -32,6 +32,7 @@ appearsSecure request = isSecure request || any (uncurry matchHeader)
3232 , ("HTTP_X_FORWARDED_SSL" , (== "on"))
3333 , ("HTTP_X_FORWARDED_SCHEME", (== "https"))
3434 , ("HTTP_X_FORWARDED_PROTO" , ((== ["https"]) . take 1 . C.split ','))
35+ , ("X-Forwarded-Proto" , (== "https")) -- Used by Nginx and AWS ELB.
3536 ]
3637
3738 where