mirror of
https://github.com/freckle/yesod-auth-oauth2.git
synced 2026-02-05 23:57:28 +01:00
Restyled by stylish-haskell
This commit is contained in:
parent
a20f38ff18
commit
6292de21c6
@ -18,8 +18,8 @@ import qualified Data.Text as T
|
||||
import Data.Text.Encoding (encodeUtf8)
|
||||
import Network.HTTP.Conduit (Manager)
|
||||
import Network.OAuth.OAuth2.Compat
|
||||
import URI.ByteString.Extension
|
||||
import UnliftIO.Exception
|
||||
import URI.ByteString.Extension
|
||||
import Yesod.Auth hiding (ServerError)
|
||||
import Yesod.Auth.OAuth2.DispatchError
|
||||
import Yesod.Auth.OAuth2.ErrorResponse
|
||||
|
||||
@ -37,7 +37,7 @@ pluginName = "okta"
|
||||
-- | Creates an Okta 'AuthPlugin' for application using the default scopes.
|
||||
oauth2Okta
|
||||
:: YesodAuth m
|
||||
=>
|
||||
=>
|
||||
-- | Prompt login on authorize redirect
|
||||
Bool
|
||||
->
|
||||
@ -61,7 +61,7 @@ oauth2Okta = oauth2OktaWithScopes defaultOktaScopes
|
||||
-- | Creates an Okta 'AuthPlugin' for application with access to the provided scopes.
|
||||
oauth2OktaWithScopes
|
||||
:: YesodAuth m
|
||||
=>
|
||||
=>
|
||||
-- | The scopes accessible to the 'AuthPlugin'
|
||||
[Text]
|
||||
->
|
||||
|
||||
@ -14,7 +14,7 @@ module Yesod.Auth.OAuth2.Slack
|
||||
import Yesod.Auth.OAuth2.Prelude
|
||||
|
||||
import Network.HTTP.Client
|
||||
(httpLbs, parseUrlThrow, responseBody, setQueryString)
|
||||
(httpLbs, parseUrlThrow, responseBody, setQueryString)
|
||||
import Yesod.Auth.OAuth2.Exception as YesodOAuth2Exception
|
||||
|
||||
data SlackScope
|
||||
|
||||
Loading…
Reference in New Issue
Block a user