diff --git a/src/Foundation.hs b/src/Foundation.hs
index af8334958..381aba0e1 100644
--- a/src/Foundation.hs
+++ b/src/Foundation.hs
@@ -1100,6 +1100,7 @@ instance YesodAuth UniWorX where
       case appLdapConf of
         Just ldapConf -> do
           ldapData <- campusUser ldapConf $ Creds userPlugin userIdent credsExtra
+          $logDebugS "LDAP" $ "Successful LDAP lookup: " <> tshow ldapData
 
           let
             userMatrikelnummer' = lookup (Attr "LMU-Stud-Matrikelnummer") ldapData