authenticate 1.3.2.3 → 1.3.2.4
raw patch · 2 files changed
+1/−4 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- Web/Authenticate/BrowserId.hs +0/−3
- authenticate.cabal +1/−1
Web/Authenticate/BrowserId.hs view
@@ -25,8 +25,6 @@ -> Manager -> m (Maybe Text) checkAssertion audience assertion manager = do- liftIO $ putStrLn "In checkAssertion"- liftIO $ print (audience, assertion) req' <- liftIO $ parseUrl "https://verifier.login.persona.org/verify" let req = urlEncodedBody [ ("audience", encodeUtf8 audience)@@ -34,7 +32,6 @@ ] req' { method = "POST" } res <- httpLbs req manager let lbs = responseBody res- liftIO $ putStrLn $ "Response body: " ++ show lbs return $ maybeResult (parse json lbs) >>= getEmail where getEmail (Object o) =
authenticate.cabal view
@@ -1,5 +1,5 @@ name: authenticate-version: 1.3.2.3+version: 1.3.2.4 license: BSD3 license-file: LICENSE author: Michael Snoyman, Hiromi Ishii, Arash Rouhani