From 3d6c07221c4772f9be6507057dc8daec98a61b19 Mon Sep 17 00:00:00 2001 From: patrick brisbin Date: Fri, 26 Jan 2018 09:36:34 -0500 Subject: [PATCH] Lint --- src/Yesod/Auth/OAuth2/Salesforce.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Yesod/Auth/OAuth2/Salesforce.hs b/src/Yesod/Auth/OAuth2/Salesforce.hs index aa75209..ed1107a 100644 --- a/src/Yesod/Auth/OAuth2/Salesforce.hs +++ b/src/Yesod/Auth/OAuth2/Salesforce.hs @@ -143,6 +143,6 @@ toCreds name user token = Creds , ("access_token", atoken $ accessToken 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) }