gssapi-wai 0.1.0.0 → 0.1.0.1
raw patch · 2 files changed
+2/−2 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
gssapi-wai.cabal view
@@ -1,5 +1,5 @@ name: gssapi-wai-version: 0.1.0.0+version: 0.1.0.1 synopsis: WAI Middleware for SPNEGO authentiaction description: Basic WAI Middleware allows both SPNEGO and failback to Kerberos username/password authentication.
src/Network/Wai/Middleware/SpnegoAuth.hs view
@@ -107,7 +107,7 @@ fakeAuth user myreq | spnegoFakeBasicAuth = let oldHeaders = requestHeaders myreq- fakeHeader = (hAuthorization, "Basic " <> B64.encode (user <> ":password"))+ fakeHeader = (hAuthorization, "Basic " <> B64.encode (stripSpnegoRealm user <> ":password")) in myreq{requestHeaders=fakeHeader : oldHeaders} | otherwise = myreq