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)
     }