Use subject encoding.
This commit is contained in:
parent
340bbaf5e5
commit
59ce69e7e3
1 changed files with 5 additions and 1 deletions
|
@ -44,7 +44,11 @@
|
|||
|
||||
;; Ensures the subject has proper encoding
|
||||
(define (encode-subject subj)
|
||||
subj)
|
||||
(if (string-utf8? subj)
|
||||
(string-append "=?UTF-8?Q?"
|
||||
(string->qp subj)
|
||||
"?=")
|
||||
subj))
|
||||
|
||||
;; Sends an email using the UNIX mail(1) utility.
|
||||
(define (send-mail body-lines . args)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue