diff --git a/src/notifications.scm b/src/notifications.scm index d2ffa7c..2de4254 100644 --- a/src/notifications.scm +++ b/src/notifications.scm @@ -121,7 +121,8 @@ `((to . ,(brmember-info mr 'mail)) (subject . "Připomínka členských příspěvků / Membership fees reminder") (body . ,(reminder-email-body mr)) - (headers . ,(list "Content-Type: text/plain; charset=\"UTF-8\"")) + (headers . ,(list "Content-Type: text/plain; charset=\"UTF-8\"" + (format "From: ~A" (*email-from*)))) ))) ;; Creates and prints reminder email for given member record