(message-resend): Bind rfc2047-encode-encoded-words.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 5ab5904..c597245 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2004-05-26  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+       * message.el (message-resend): Bind rfc2047-encode-encoded-words.
+
 2004-05-26  Teodor Zlatanov  <tzz@lifelogs.com>
 
        * spam.el (spam-mark-junk-as-spam-routine)

diff --git a/lisp/message.el b/lisp/message.el
index 949a248..a5e5442 100644 (file)
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -6338,7 +6338,8 @@ Optional DIGEST will use digest to forward."
        (replace-match "X-From-Line: "))
       ;; Send it.
       (let ((message-inhibit-body-encoding t)
-           message-required-mail-headers)
+           message-required-mail-headers
+           rfc2047-encode-encoded-words)
        (message-send-mail))
       (kill-buffer (current-buffer)))
     (message "Resending message to %s...done" address)))