mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-03 06:00:50 -08:00
Code Issues Projects Releases Wiki Activity

Ensure that `mail-send' breaks too-long lines

Browse source 
* lisp/mail/sendmail.el (mail-send): Ensure that we fold too-long
lines when using `sendmail-user-agent' (bug#53412).
This commit is contained in:
Lars Ingebrigtsen 2022-02-20 13:41:57 +01:00
parent 06b7c53927
commit f0b4f2ee6b
1 changed files with 4 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/mail/sendmail.el
View file

@ -955,7 +955,10 @@ the user from the mailer."
(error "Invalid header line (maybe a continuation line lacks initial whitespace)"))
(forward-line 1)))
(goto-char opoint)
(when mail-encode-mml
(when (or mail-encode-mml
;; When we have long lines, we have to MIME encode
;; to get line folding.
(mm-long-lines-p 1000))
(mml-to-mime)
(setq mail-encode-mml nil))
(run-hooks 'mail-send-hook)