haskell/yesod-auth-oauth2
1
0
Fork 0
mirror of https://github.com/freckle/yesod-auth-oauth2.git synced 2026-08-30 00:13:51 +02:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

Fix line-endings in Battle plugin

Browse Source
This commit is contained in:
patrick brisbin 2018-01-23 08:48:08 -05:00
parent 400111f9a0
commit ed58922727
1 changed files with 83 additions and 83 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
src/Yesod/Auth/OAuth2/BattleNet.hs
View File

@ -1,4 +1,4 @@
{-# LANGUAGE CPP #-} {-# LANGUAGE CPP #-}
{-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE OverloadedStrings #-}
-- | -- |
@ -15,24 +15,24 @@ module Yesod.Auth.OAuth2.BattleNet
where where
#if __GLASGOW_HASKELL__ < 710 #if __GLASGOW_HASKELL__ < 710
import Control.Applicative ((<$>), (<*>)) import Control.Applicative ((<$>), (<*>))
#endif #endif
import Control.Exception (throwIO) import Control.Exception (throwIO)
import Control.Monad (mzero) import Control.Monad (mzero)
import Yesod.Auth import Yesod.Auth
import Yesod.Auth.OAuth2 import Yesod.Auth.OAuth2
import Data.Monoid ((<>)) import Data.Monoid ((<>))
import Network.HTTP.Conduit (Manager) import Network.HTTP.Conduit (Manager)
import Data.Aeson import Data.Aeson
import Data.Text (Text) import Data.Text (Text)
import qualified Data.Text as T (pack, toLower) import qualified Data.Text as T (pack, toLower)
import qualified Data.Text.Encoding as E (encodeUtf8) import qualified Data.Text.Encoding as E (encodeUtf8)
import Prelude import Prelude
import Yesod.Core.Widget import Yesod.Core.Widget
data BattleNetUser = BattleNetUser data BattleNetUser = BattleNetUser
{ userId :: Int { userId :: Int