From 8b01911e9446d69c572b6c6078a9fc28b75dcf03 Mon Sep 17 00:00:00 2001
From: Vincent Ambo <mail@tazj.in>
Date: Sat, 28 May 2022 20:34:06 +0200
Subject: fix(panettone): Correctly extract user email

Change-Id: I30c83f93006eed63c20440faf7118c8d22c1a239
Reviewed-on: https://cl.tvl.fyi/c/depot/+/5783
Reviewed-by: grfn <grfn@gws.fyi>
Autosubmit: tazjin <tazjin@tvl.su>
Tested-by: BuildkiteCI
---
 web/panettone/src/email.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'web/panettone')

diff --git a/web/panettone/src/email.lisp b/web/panettone/src/email.lisp
index 72b2e146b46a..66ea299858d3 100644
--- a/web/panettone/src/email.lisp
+++ b/web/panettone/src/email.lisp
@@ -42,7 +42,7 @@ values of `*smtp-server*', `*smtp-server-port*' and `*email-notification-from*'"
   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))
-                (user-mail user))
+                (user-mail (mail user)))
       (send-email-notification
        :to user-mail
        :subject subject
-- 
cgit 1.4.1