From d9568fe742130af94c8349d4b52e1ca577b41c9b Mon Sep 17 00:00:00 2001 From: ckonstanski Date: Sat, 3 Jul 2021 14:24:29 -0600 Subject: fixed email subject --- src/core.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/core.lisp') diff --git a/src/core.lisp b/src/core.lisp index 3f217c5..de884d6 100644 --- a/src/core.lisp +++ b/src/core.lisp @@ -195,7 +195,7 @@ list of `cl-smtp:attachment' objects if non-nil." `(cl-smtp:send-email ,mail-server ,from ,(if *sendmail-debug* *sendmail-debug* to) - ,(if *sendmail-debug* (format nil "DEBUG ~a" subject) subject) + ,subject ,message ,@(when display-name `(:display-name ,display-name)) ,@(when reply-to `(:reply-to ,reply-to)) -- cgit v1.3