diff options
author | Vincent Ambo <mail@tazj.in> | 2022-05-28T16·06+0200 |
---|---|---|
committer | tazjin <tazjin@tvl.su> | 2022-05-28T17·03+0000 |
commit | 10768741cdc8c69240a8152d8195c2362c76535c (patch) | |
tree | d4c4e5f51dddb0df1a2dd1a9397bab084fbb2e70 /web/panettone/src/packages.lisp | |
parent | 38be32c6b0f847aec1d1e19eb2765485d9f2ed39 (diff) |
fix(web/panettone): Only send emails if the email is known r/4178
Upcoming changes to the authentication model may mean that user objects do not have an email address attached. Change-Id: I4fddb810f723c790d243f779714ca7f189a02aeb Reviewed-on: https://cl.tvl.fyi/c/depot/+/5770 Tested-by: BuildkiteCI Reviewed-by: grfn <grfn@gws.fyi>
Diffstat (limited to 'web/panettone/src/packages.lisp')
-rw-r--r-- | web/panettone/src/packages.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/web/panettone/src/packages.lisp b/web/panettone/src/packages.lisp index 81d2bed728d4..d3e23d5b33ed 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 |