yesod-auth-oauth2 0.7.3.0 → 0.7.4.0
raw patch · 3 files changed
+25/−5 lines, 3 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
+ Yesod.Auth.OAuth2.AzureADv2: oauth2AzureADv2ScopedWidget :: YesodAuth m => WidgetFor m () -> [Text] -> Text -> Text -> Text -> AuthPlugin m
+ Yesod.Auth.OAuth2.AzureADv2: oauth2AzureADv2Widget :: YesodAuth m => WidgetFor m () -> Text -> Text -> Text -> AuthPlugin m
Files
- CHANGELOG.md +5/−1
- src/Yesod/Auth/OAuth2/AzureADv2.hs +19/−3
- yesod-auth-oauth2.cabal +1/−1
CHANGELOG.md view
@@ -1,4 +1,8 @@-## [_Unreleased_](https://github.com/thoughtbot/yesod-auth-oauth2/compare/v0.7.3.0...main)+## [_Unreleased_](https://github.com/thoughtbot/yesod-auth-oauth2/compare/v0.7.4.0...main)++## [v0.7.4.0](https://github.com/thoughtbot/yesod-auth-oauth2/compare/v0.7.3.0...v0.7.4.0)++- Add `oauth2AzureADv2Widget` and `oauth2AzureADv2ScopedWidget` ## [v0.7.3.0](https://github.com/thoughtbot/yesod-auth-oauth2/compare/v0.7.2.0...v0.7.3.0)
src/Yesod/Auth/OAuth2/AzureADv2.hs view
@@ -1,4 +1,5 @@ {-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE QuasiQuotes #-} -- | --@@ -9,9 +10,12 @@ module Yesod.Auth.OAuth2.AzureADv2 ( oauth2AzureADv2 , oauth2AzureADv2Scoped+ , oauth2AzureADv2Widget+ , oauth2AzureADv2ScopedWidget ) where import Yesod.Auth.OAuth2.Prelude+import Yesod.Core (WidgetFor, whamlet) import Prelude import Data.String@@ -41,9 +45,21 @@ -> AuthPlugin m oauth2AzureADv2 = oauth2AzureADv2Scoped defaultScopes +oauth2AzureADv2Widget+ :: YesodAuth m => WidgetFor m () -> Text -> Text -> Text -> AuthPlugin m+oauth2AzureADv2Widget widget =+ oauth2AzureADv2ScopedWidget widget defaultScopes+ oauth2AzureADv2Scoped+ :: YesodAuth m => [Text] -> Text -> Text -> Text -> AuthPlugin m+oauth2AzureADv2Scoped =+ oauth2AzureADv2ScopedWidget [whamlet|Login via #{pluginName}|]++oauth2AzureADv2ScopedWidget :: YesodAuth m- => [Text]+ => WidgetFor m ()+ -- ^ Widget+ -> [Text] -- ^ Scopes -> Text -- ^ Tenant Id@@ -54,8 +70,8 @@ -> Text -- ^ Client Secret -> AuthPlugin m-oauth2AzureADv2Scoped scopes tenantId clientId clientSecret =- authOAuth2 pluginName oauth2 $ \manager token -> do+oauth2AzureADv2ScopedWidget widget scopes tenantId clientId clientSecret =+ authOAuth2Widget widget pluginName oauth2 $ \manager token -> do (User userId, userResponse) <- authGetProfile pluginName
yesod-auth-oauth2.cabal view
@@ -1,6 +1,6 @@ cabal-version: 1.18 name: yesod-auth-oauth2-version: 0.7.3.0+version: 0.7.4.0 license: MIT license-file: LICENSE maintainer: engineering@freckle.com