Commit 19a0baf7 authored by Eli Zaretskii's avatar Eli Zaretskii

(smtpmail-send-queued-mail): Insert the enqueued messages literally.

parent 440c4d7a
2001-12-10 Eli Zaretskii <eliz@is.elta.co.il>
* mail/smtpmail.el (smtpmail-send-queued-mail): Insert the
enqueued messages literally.
2001-12-10 Noah Friedman <friedman@splode.com>
* battery.el (battery-insert-file-contents): Obsolete function
......
......@@ -376,7 +376,10 @@ This is relative to `smtpmail-queue-dir'.")
(while (not (eobp))
(setq file-msg (buffer-substring (point) (line-end-position)))
(load file-msg)
(setq tembuf (find-file-noselect file-msg))
;; Insert the message literally: it is already encoded as per
;; the MIME headers, and code conversions might guess the
;; encoding wrongly.
(setq tembuf (find-file-noselect file-msg nil t))
(if (not (null smtpmail-recipient-address-list))
(if (not (smtpmail-via-smtp smtpmail-recipient-address-list
tembuf))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment