brmlab/hackerbase
4
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Use subject encoding.

Browse source
This commit is contained in:
Dominik Pantůček 2023-04-11 14:19:10 +02:00
parent 340bbaf5e5
commit 59ce69e7e3
1 changed files with 5 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

6
src/util-mail.scm
View file

@ -44,7 +44,11 @@
;; Ensures the subject has proper encoding ;; Ensures the subject has proper encoding
(define (encode-subject subj) (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. ;; Sends an email using the UNIX mail(1) utility.
(define (send-mail body-lines . args) (define (send-mail body-lines . args)