(sendmail-send-it): The priority of coding

system for encoding outgoing mails is (1) local value of
buffer-file-coding-system, (2) sendmail-coding-syste, (3)
default-buffer-file-coding-system.

diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el
index e5f1495ca8161f23a3ea6e5806761c9b3b946be3..1035aba71cbe56e55fc901e7d2098d17a48b9c90 100644 (file)
--- a/lisp/mail/sendmail.el
+++ b/lisp/mail/sendmail.el
@@ -619,8 +619,11 @@ the user from the mailer."
        delimline
        fcc-was-found
        (mailbuf (current-buffer))
-       (sendmail-coding-system (or buffer-file-coding-system
-                                       sendmail-coding-system)))
+       (sendmail-coding-system
+        (if (local-variable-p 'buffer-file-coding-system)
+            buffer-file-coding-system
+          (or sendmail-coding-system
+              default-buffer-file-coding-system))))
     (unwind-protect
        (save-excursion
          (set-buffer tembuf)