diff --git a/src/Foundation/Yesod/Auth.hs b/src/Foundation/Yesod/Auth.hs
index 95dd60e80..975b2b825 100644
--- a/src/Foundation/Yesod/Auth.hs
+++ b/src/Foundation/Yesod/Auth.hs
@@ -40,19 +40,8 @@ import qualified Data.Set as Set
 import qualified Data.Text as Text
 import qualified Data.Text.Encoding as Text
 
-import Foundation.Authorization (AuthorizationCacheKey(..))
-import Foundation.I18n
-import Foundation.Type
-import Foundation.Types
-
-import Handler.Utils.LdapSystemFunctions
-import Handler.Utils.Memcached
-import Handler.Utils.Profile
-
 import qualified Ldap.Client as Ldap
 
-import Yesod.Auth.Message
-
 
 authenticate :: ( MonadHandler m, HandlerSite m ~ UniWorX
                 , YesodPersist UniWorX, BackendCompatible SqlBackend (YesodPersistBackend UniWorX)
@@ -64,7 +53,7 @@ authenticate creds@Creds{..} = liftHandler . runDB . withReaderT projectBackend
   $logErrorS "Auth" $ "\a\27[31m" <> tshow creds <> "\27[0m" -- TODO: debug only
   setSessionJson SessionOAuth2Token $ (getAccessToken creds, getRefreshToken creds)
   sess <- getSession
-  $logErrorS "OAuth" $ "\27[34m" <> tshow sess <> "\27[0m"
+  $logErrorS "OAuth" $ "\27[34m" <> tshow sess <> "\27[0m" -- TODO: debug only
 
   now <- liftIO getCurrentTime
   userAuthConf <- getsYesod $ view _appUserAuthConf