comparison lisp/mail/rmail.el @ 101882:5cd64f3517f3

(rmail): Bind coding-system-for-read to no-conversion before calling find-file-noselect. (Bug#2015)
author Eli Zaretskii <eliz@gnu.org>
date Sat, 07 Feb 2009 18:35:05 +0000
parents 595dd77c0199
children 85a6bf6279eb
comparison
equal deleted inserted replaced
101881:43b1a5e6eb09 101882:5cd64f3517f3
841 (when (and (verify-visited-file-modtime existed) 841 (when (and (verify-visited-file-modtime existed)
842 (eq major-mode 'rmail-mode)) 842 (eq major-mode 'rmail-mode))
843 (rmail-set-message-counters))) 843 (rmail-set-message-counters)))
844 ;; The mail file is either unchanged or not visited. Visit it. 844 ;; The mail file is either unchanged or not visited. Visit it.
845 (switch-to-buffer 845 (switch-to-buffer
846 (let ((enable-local-variables nil)) 846 (let ((enable-local-variables nil)
847 ;; Force no-conversion by default, since that's what
848 ;; pre-mbox Rmail did with BABYL files (via
849 ;; auto-coding-regexp-alist).
850 (coding-system-for-read
851 (or coding-system-for-read 'no-conversion)))
847 (find-file-noselect file-name)))) 852 (find-file-noselect file-name))))
848 ;; Ensure that the collection and view buffers are in sync and 853 ;; Ensure that the collection and view buffers are in sync and
849 ;; ensure that a message is not being edited. 854 ;; ensure that a message is not being edited.
850 (if (eq major-mode 'rmail-mode) 855 (if (eq major-mode 'rmail-mode)
851 (rmail-swap-buffers-maybe)) 856 (rmail-swap-buffers-maybe))