hoauth2 1.7.0 → 1.7.1

raw patch · 3 files changed

+7/−6 lines, 3 filesdep ~exceptionsdep ~hoauth2PVP ok

version bump matches the API change (PVP)

Dependency ranges changed: exceptions, hoauth2

API changes (from Hackage documentation)

Files

• example/App.hs +1/−1
• hoauth2.cabal +3/−3
• src/Network/OAuth/OAuth2/HttpClient.hs +3/−2

@@ -110,7 +110,7 @@   result <- liftIO $ tryFetchUser idp code    case result of-    Right luser -> (updateIdp c idpData luser) >> redirectToHomeM+    Right luser -> updateIdp c idpData luser >> redirectToHomeM     Left err    -> errorM ("fetchTokenAndUser: " `TL.append` err)    where lookIdp c1 idp1 = liftIO $ lookupKey c1 (idpLabel idp1)

@@ -1,6 +1,6 @@ Name:                hoauth2 -- http://wiki.haskell.org/Package_versioning_policy-Version:             1.7.0+Version:             1.7.1  Synopsis:            Haskell OAuth2 authentication client @@ -82,7 +82,7 @@                  uri-bytestring       >= 0.2.3.1 && < 0.4,                  uri-bytestring-aeson >= 0.1   && < 0.2,                  microlens            >= 0.4.0 && < 0.5,-                 exceptions           >= 0.8.3 && < 0.9+                 exceptions           >= 0.8.3 && < 0.10    if impl(ghc >= 6.12.0)       ghc-options: -Wall -fwarn-tabs -funbox-strict-fields@@ -136,7 +136,7 @@                        binary >= 0.8.3.0 && < 0.8.5,                        parsec >= 3.1.11 && < 3.2.0 ,                        hashable >= 1.2.6 && < 1.3.0,-                       hoauth2 >= 1.6 && < 1.7+                       hoauth2    if impl(ghc >= 6.12.0)       ghc-options: -Wall -fwarn-tabs -funbox-strict-fields

@@ -79,7 +79,7 @@ refreshAccessToken manager oa token = doFlexiblePostRequest manager oa uri body                               where (uri, body) = refreshAccessTokenUrl oa token -{-# DEPRECATED fetchRefreshToken "Use refreshAccessToken" #-}+{-# DEPRECATED fetchRefreshToken "Use refreshAccessToken since this method will be removed in future release" #-} fetchRefreshToken :: Manager                         -- ^ HTTP connection manager.                      -> OAuth2                       -- ^ OAuth context                      -> RefreshToken                 -- ^ refresh token gained after authorization@@ -97,6 +97,7 @@ doJSONPostRequest manager oa uri body = fmap parseResponseJSON (doSimplePostRequest manager oa uri body)  -- | Conduct post request and return response as JSON or Query String.+{-# DEPRECATED doFlexiblePostRequest "Use doJSONPostRequest since this function would be removed in future release." #-} doFlexiblePostRequest :: FromJSON err => FromJSON a                          => Manager                             -- ^ HTTP connection manager.                          -> OAuth2                              -- ^ OAuth options@@ -242,7 +243,7 @@     paramToPair (k, mv) = (T.decodeUtf8 k, maybe Null (String . T.decodeUtf8) mv)     errorMessage = parseOAuth2Error b --- | Try 'parseResponseJSON' and 'parseResponseString'+-- | Try 'parseResponseJSON', if failed then parses the @OAuth2Result BSL.ByteString@ that contains not JSON but a Query String. parseResponseFlexible :: FromJSON err => FromJSON a                          => OAuth2Result err BSL.ByteString                          -> OAuth2Result err a