diff --git a/src/notifications.scm b/src/notifications.scm index 3eecad7..349f28c 100644 --- a/src/notifications.scm +++ b/src/notifications.scm @@ -120,7 +120,9 @@ (make-ldict `((to . ,(brmember-info mr 'mail)) (subject . "Připomínka členských příspěvků / Membership fees reminder") - (body . ,(reminder-email-body mr))))) + (body . ,(reminder-email-body mr)) + (header .,(list (format "Content-Type: text/plain; charset=\"UTF-8\""))) + ))) ;; Creates and prints reminder email for given member record (define (make+print-reminder-email mr)