(mail-setup): Clear out buffer-file-coding-system.

1 files changed, 2 insertions, 0 deletions

diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el
index 2a516596a84..925b08fc97d 100644
--- a/lisp/mail/sendmail.el
+++ b/lisp/mail/sendmail.el
@@ -254,6 +254,8 @@ actually occur.")
         (setq mail-aliases nil)
         (if (file-exists-p mail-personal-alias-file)
             (build-mail-aliases))))
+  ;; Don't leave this around from a previous message.
+  (setq buffer-file-coding-system nil)
   (setq mail-send-actions actions)
   (setq mail-reply-action replybuffer)
   (goto-char (point-min))