diff --git a/web/panettone/src/email.lisp b/web/panettone/src/email.lisp
index cb01c488a..72b2e146b 100644
--- a/web/panettone/src/email.lisp
+++ b/web/panettone/src/email.lisp
@@ -41,8 +41,9 @@ values of `*smtp-server*', `*smtp-server-port*' and `*email-notification-from*'"
   "Sends an email notification to the user with DN with the given SUBJECT and
   MESSAGE, iff that user has not disabled email notifications"
   (when (user-has-email-notifications-enabled-p dn)
-    (when-let ((user (find-user-by-dn dn)))
+    (when-let* ((user (find-user-by-dn dn))
+                (user-mail user))
       (send-email-notification
-       :to (mail user)
+       :to user-mail
        :subject subject
        :message message))))
diff --git a/web/panettone/src/packages.lisp b/web/panettone/src/packages.lisp
index 81d2bed72..d3e23d5b3 100644
--- a/web/panettone/src/packages.lisp
+++ b/web/panettone/src/packages.lisp
@@ -55,7 +55,7 @@
 (defpackage panettone.email
   (:nicknames :email)
   (:use :cl)
-  (:import-from :alexandria :when-let)
+  (:import-from :alexandria :when-let :when-let*)
   (:import-from :panettone.model
    :settings-for-user :enable-email-notifications-p)
   (:import-from :panettone.authentication