Make sure smtpmail produces valid mbox files with Unix EOLs for FCC.
lisp/mail/smtpmail.el (smtpmail-send-it): Bind coding-system-for-write to *-unix, so that FCC files are kept in valid mbox format.
This commit is contained in:
parent
f7fd3d79b7
commit
3f018d6d39
2 changed files with 10 additions and 1 deletions
|
@ -1,3 +1,9 @@
|
|||
2012-03-09 Eli Zaretskii <eliz@gnu.org>
|
||||
|
||||
* mail/smtpmail.el (smtpmail-send-it): Bind
|
||||
coding-system-for-write to *-unix, so that FCC files are kept in
|
||||
valid mbox format.
|
||||
|
||||
2012-03-09 Glenn Morris <rgm@gnu.org>
|
||||
|
||||
* files.el (dir-locals-find-file):
|
||||
|
|
|
@ -324,7 +324,10 @@ The list is in preference order.")
|
|||
(if (re-search-forward "^FCC:" delimline t)
|
||||
;; Force `mail-do-fcc' to use the encoding of the mail
|
||||
;; buffer to encode outgoing messages on FCC files.
|
||||
(let ((coding-system-for-write smtpmail-code-conv-from))
|
||||
(let ((coding-system-for-write
|
||||
;; mbox files must have Unix EOLs.
|
||||
(coding-system-change-eol-conversion
|
||||
smtpmail-code-conv-from 'unix)))
|
||||
(mail-do-fcc delimline)))
|
||||
(if mail-interactive
|
||||
(with-current-buffer errbuf
|
||||
|
|
Loading…
Add table
Reference in a new issue