haskell/yesod-auth-oauth2
1
0
Fork 0
mirror of https://github.com/freckle/yesod-auth-oauth2.git synced 2026-03-28 06:47:02 +01:00
Code Issues Actions Packages Projects Releases Wiki Activity

Restyled by stylish-haskell

Browse Source
This commit is contained in:
Restyled.io 2022-03-18 14:10:11 +00:00
parent 8427ab4128
commit b83d9238dc
2 changed files with 31 additions and 33 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

60
example/Main.hs
View File

@ -21,37 +21,35 @@
-- --
module Main where module Main where
import Data.Aeson import Data.Aeson
import Data.Aeson.Encode.Pretty import Data.Aeson.Encode.Pretty
import Data.ByteString.Lazy ( fromStrict import Data.ByteString.Lazy (fromStrict, toStrict)
, toStrict import qualified Data.Map as M
) import Data.Maybe (fromJust)
import qualified Data.Map as M import Data.Text (Text)
import Data.Maybe ( fromJust ) import qualified Data.Text as T
import Data.Text ( Text ) import Data.Text.Encoding (decodeUtf8)
import qualified Data.Text as T import LoadEnv
import Data.Text.Encoding ( decodeUtf8 ) import Network.HTTP.Conduit
import LoadEnv import Network.Wai.Handler.Warp (runEnv)
import Network.HTTP.Conduit import System.Environment (getEnv)
import Network.Wai.Handler.Warp ( runEnv ) import Yesod
import System.Environment ( getEnv ) import Yesod.Auth
import Yesod import Yesod.Auth.OAuth2.AzureAD
import Yesod.Auth import Yesod.Auth.OAuth2.BattleNet
import Yesod.Auth.OAuth2.AzureAD import Yesod.Auth.OAuth2.Bitbucket
import Yesod.Auth.OAuth2.BattleNet import Yesod.Auth.OAuth2.ClassLink
import Yesod.Auth.OAuth2.Bitbucket import Yesod.Auth.OAuth2.EveOnline
import Yesod.Auth.OAuth2.ClassLink import Yesod.Auth.OAuth2.GitHub
import Yesod.Auth.OAuth2.EveOnline import Yesod.Auth.OAuth2.GitLab
import Yesod.Auth.OAuth2.GitHub import Yesod.Auth.OAuth2.Google
import Yesod.Auth.OAuth2.GitLab import Yesod.Auth.OAuth2.Nylas
import Yesod.Auth.OAuth2.Google import Yesod.Auth.OAuth2.Salesforce
import Yesod.Auth.OAuth2.Nylas import Yesod.Auth.OAuth2.Slack
import Yesod.Auth.OAuth2.Salesforce import Yesod.Auth.OAuth2.Spotify
import Yesod.Auth.OAuth2.Slack import Yesod.Auth.OAuth2.Twitch
import Yesod.Auth.OAuth2.Spotify import Yesod.Auth.OAuth2.Upcase
import Yesod.Auth.OAuth2.Twitch import Yesod.Auth.OAuth2.WordPressDotCom
import Yesod.Auth.OAuth2.Upcase
import Yesod.Auth.OAuth2.WordPressDotCom
data App = App data App = App
{ appHttpManager :: Manager { appHttpManager :: Manager

4
src/Yesod/Auth/OAuth2/Twitch.hs
View File

@ -11,9 +11,9 @@ module Yesod.Auth.OAuth2.Twitch
, oauth2TwitchScoped , oauth2TwitchScoped
) where ) where
import Yesod.Auth.OAuth2.Prelude import Yesod.Auth.OAuth2.Prelude
import qualified Data.Text.Encoding as T import qualified Data.Text.Encoding as T
newtype User = User Text newtype User = User Text