Resurrect encoding of replies by Rmail which was lost in 2012-04-11T21:37:13Z!monnier@iro.umontreal.ca.

lisp/mail/rmail.el (rmail-yank-current-message): Use the encoding of
 the yanked message in preference to the default value of
 buffer-file-coding-system.
This commit is contained in:
Eli Zaretskii 2012-04-30 15:50:12 +03:00
parent d9558cadd4
commit 91af76bf30
2 changed files with 17 additions and 2 deletions

View file

@ -1,3 +1,9 @@
2012-04-30 Eli Zaretskii <eliz@gnu.org>
* mail/rmail.el (rmail-yank-current-message): Use the encoding of
the yanked message in preference to the default value of
buffer-file-coding-system.
2012-04-30 Martin Rudalics <rudalics@gmx.at>
* window.el (display-buffer--action-function-custom-type): Fix

View file

@ -3567,8 +3567,17 @@ If BUFFER is not swapped, yank out of its message viewer buffer."
(with-current-buffer buffer
(unless (rmail-buffers-swapped-p)
(setq buffer rmail-view-buffer)))
(insert-buffer buffer))
(insert-buffer buffer)
;; If they yank the text of BUFFER, the encoding of BUFFER is a
;; better default for the reply message than the default value of
;; buffer-file-coding-system.
(and (coding-system-equal (default-value 'buffer-file-coding-system)
buffer-file-coding-system)
(setq buffer-file-coding-system
(coding-system-change-text-conversion
buffer-file-coding-system (coding-system-base
(with-current-buffer buffer
buffer-file-coding-system))))))
(defun rmail-start-mail (&optional noerase to subject in-reply-to cc
replybuffer sendactions same-window