From 717bd4ac5a1c52aca2927d6cbbd6a3e2cfc10624 Mon Sep 17 00:00:00 2001 From: tomo Date: Tue, 4 Jun 2002 08:52:31 +0000 Subject: [PATCH] GNU Emacs 21.2 with LEIM. --- mail/feedmail.el | 2 +- mail/smtpmail.el | 5 ++++- 2 files changed, 5 insertions(+), 2 deletions(-) diff --git a/mail/feedmail.el b/mail/feedmail.el index a567907..7db3215 100644 --- a/mail/feedmail.el +++ b/mail/feedmail.el @@ -308,7 +308,7 @@ (defgroup feedmail nil "Assist other email packages to massage outgoing messages." :link '(url-link "http://www.carpenter.org/feedmail/feedmail.html") - :link '(emacs-commentary "feedmail") + :link '(emacs-commentary-link "feedmail") :group 'mail) (defgroup feedmail-misc nil diff --git a/mail/smtpmail.el b/mail/smtpmail.el index f57d087..f3786c4 100644 --- a/mail/smtpmail.el +++ b/mail/smtpmail.el @@ -310,7 +310,10 @@ This is relative to `smtpmail-queue-dir'.") (end-of-line) (point)))) (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)) -- 1.7.10.4