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

Lint

Browse Source
This commit is contained in:
patrick brisbin 2018-01-26 09:36:34 -05:00
parent 041a9a318b
commit 3d6c07221c
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Yesod/Auth/OAuth2/Salesforce.hs
View File

@ -143,6 +143,6 @@ toCreds name user token = Creds
, ("access_token", atoken $ accessToken token) , ("access_token", atoken $ accessToken token)
] ]
++ maybeExtra "refresh_token" (rtoken <$> refreshToken token) ++ maybeExtra "refresh_token" (rtoken <$> refreshToken token)
++ maybeExtra "expires_in" ((T.pack . show) <$> expiresIn token) ++ maybeExtra "expires_in" (T.pack . show <$> expiresIn token)
++ maybeExtra "phone_number" (userPhone user) ++ maybeExtra "phone_number" (userPhone user)
} }