Fix bug #7589 with EOL format in smtpmail's queued mail.
mail/smtpmail.el (smtpmail-send-it): Write queued mail body with Unix EOLs.
This commit is contained in:
parent
11aad4e9f9
commit
95e4cc854b
2 changed files with 13 additions and 1 deletions
|
@ -1,3 +1,8 @@
|
|||
2010-12-13 Eli Zaretskii <eliz@gnu.org>
|
||||
|
||||
* mail/smtpmail.el (smtpmail-send-it): Write queued mail body with
|
||||
Unix EOLs. (Bug#7589)
|
||||
|
||||
2010-12-12 Eli Zaretskii <eliz@gnu.org>
|
||||
|
||||
* subr.el (posn-col-row): Evaluate header-line-format in the
|
||||
|
|
|
@ -392,7 +392,14 @@ The list is in preference order.")
|
|||
(make-directory smtpmail-queue-dir t))
|
||||
(with-current-buffer buffer-data
|
||||
(erase-buffer)
|
||||
(set-buffer-file-coding-system smtpmail-code-conv-from nil t)
|
||||
(set-buffer-file-coding-system
|
||||
;; We will be reading the file with no-conversion in
|
||||
;; smtpmail-send-queued-mail below, so write it out
|
||||
;; with Unix EOLs.
|
||||
(coding-system-change-eol-conversion
|
||||
(or smtpmail-code-conv-from 'undecided)
|
||||
'unix)
|
||||
nil t)
|
||||
(insert-buffer-substring tembuf)
|
||||
(write-file file-data)
|
||||
(set-buffer buffer-elisp)
|
||||
|
|
Loading…
Add table
Reference in a new issue