From fd7dd48c195e75930cc6f7e166acb424a8416337 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Sat, 17 Oct 2009 03:11:54 +0000 Subject: [PATCH] (rmail-write-region-annotate): Prevent viewing different messages from messing up the file coding. (Bug#4623) --- lisp/ChangeLog | 5 +++++ lisp/mail/rmail.el | 3 +++ 2 files changed, 8 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index fae8308bf5b..5daa5efd1b4 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2009-10-17 Glenn Morris + + * mail/rmail.el (rmail-write-region-annotate): Prevent viewing different + messages from messing up the file coding. (Bug#4623) + 2009-10-17 Jari Aalto * textmodes/ispell.el (ispell-get-decoded-string): Give an error diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index 7e817de7f64..8f44cc6f60f 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el @@ -4176,6 +4176,9 @@ encoded string (and the same mask) will decode the string." (defun rmail-write-region-annotate (start end) (when (and (null start) (rmail-buffers-swapped-p)) (set-buffer rmail-view-buffer) + ;; Prevent viewing different messages from messing up the coding. (Bug#4623) + ;; FIXME is there a better solution? + (set (make-local-variable 'coding-system-for-write) 'no-conversion) (widen) nil)) -- 2.39.5