diff --git a/Yesod/Auth/OAuth2/Learn.hs b/Yesod/Auth/OAuth2/Learn.hs
index eca9040..d260664 100644
--- a/Yesod/Auth/OAuth2/Learn.hs
+++ b/Yesod/Auth/OAuth2/Learn.hs
@@ -64,7 +64,7 @@ oauth2Learn clientId clientSecret = authOAuth2 "learn"
 fetchLearnProfile :: Manager -> AccessToken -> IO (Creds m)
 fetchLearnProfile manager token = do
     result <- authGetJSON manager token "http://learn.thoughtbot.com/api/v1/me.json"
-    
+
     case result of
         Right (LearnResponse user) -> return $ toCreds user
         Left err -> throwIO $ InvalidProfileResponse "learn" err