packages feed

authenticate 0.8.1 → 0.8.2

raw patch · 2 files changed

+7/−3 lines, 2 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

+ Web.Authenticate.OAuth: getTokenCredential :: OAuth -> Credential -> IO Credential

Files

Web/Authenticate/OAuth.hs view
@@ -8,7 +8,8 @@       -- * Signature       signOAuth,       -- * Url & operation for authentication-      authorizeUrl, getAccessToken, getTemporaryCredential, +      authorizeUrl, getAccessToken, getTemporaryCredential,+      getTokenCredential,       -- * Utility Methods       paramEncode     ) where@@ -97,7 +98,8 @@ authorizeUrl oa cr = qsUrl (oauthAuthorizeUri oa) [("oauth_token", BS.unpack $ token cr)]  -- | Get Access token.-getAccessToken :: OAuth         -- ^ OAuth Application+getAccessToken, getTokenCredential+               :: OAuth         -- ^ OAuth Application                -> Credential    -- ^ Temporary Credential with oauth_verifier                -> IO Credential -- ^ Token Credential (Access Token & Secret) getAccessToken oa cr = do@@ -105,6 +107,8 @@   rsp <- signOAuth oa cr req >>= httpLbs   let dic = parseQueryString . toStrict . responseBody $ rsp   return $ Credential dic++getTokenCredential = getAccessToken  insertMap :: Eq a => a -> b -> [(a,b)] -> [(a,b)] insertMap key val = ((key,val):) . filter ((/=key).fst)
authenticate.cabal view
@@ -1,5 +1,5 @@ name:            authenticate-version:         0.8.1+version:         0.8.2 license:         BSD3 license-file:    LICENSE author:          Michael Snoyman <michael@snoyman.com>