Restyled by stylish-haskell

This commit is contained in:
Restyled.io 2023-06-30 19:53:26 +00:00 committed by William R. Arellano
parent a20f38ff18
commit 6292de21c6
3 changed files with 4 additions and 4 deletions

View File

@ -18,8 +18,8 @@ import qualified Data.Text as T
import Data.Text.Encoding (encodeUtf8) import Data.Text.Encoding (encodeUtf8)
import Network.HTTP.Conduit (Manager) import Network.HTTP.Conduit (Manager)
import Network.OAuth.OAuth2.Compat import Network.OAuth.OAuth2.Compat
import URI.ByteString.Extension
import UnliftIO.Exception import UnliftIO.Exception
import URI.ByteString.Extension
import Yesod.Auth hiding (ServerError) import Yesod.Auth hiding (ServerError)
import Yesod.Auth.OAuth2.DispatchError import Yesod.Auth.OAuth2.DispatchError
import Yesod.Auth.OAuth2.ErrorResponse import Yesod.Auth.OAuth2.ErrorResponse

View File

@ -37,7 +37,7 @@ pluginName = "okta"
-- | Creates an Okta 'AuthPlugin' for application using the default scopes. -- | Creates an Okta 'AuthPlugin' for application using the default scopes.
oauth2Okta oauth2Okta
:: YesodAuth m :: YesodAuth m
=> =>
-- | Prompt login on authorize redirect -- | Prompt login on authorize redirect
Bool Bool
-> ->
@ -61,7 +61,7 @@ oauth2Okta = oauth2OktaWithScopes defaultOktaScopes
-- | Creates an Okta 'AuthPlugin' for application with access to the provided scopes. -- | Creates an Okta 'AuthPlugin' for application with access to the provided scopes.
oauth2OktaWithScopes oauth2OktaWithScopes
:: YesodAuth m :: YesodAuth m
=> =>
-- | The scopes accessible to the 'AuthPlugin' -- | The scopes accessible to the 'AuthPlugin'
[Text] [Text]
-> ->

View File

@ -14,7 +14,7 @@ module Yesod.Auth.OAuth2.Slack
import Yesod.Auth.OAuth2.Prelude import Yesod.Auth.OAuth2.Prelude
import Network.HTTP.Client import Network.HTTP.Client
(httpLbs, parseUrlThrow, responseBody, setQueryString) (httpLbs, parseUrlThrow, responseBody, setQueryString)
import Yesod.Auth.OAuth2.Exception as YesodOAuth2Exception import Yesod.Auth.OAuth2.Exception as YesodOAuth2Exception
data SlackScope data SlackScope