Mercurial > emacs
changeset 88209:95b10b8c9063
(rmail-decode-mbox-file): Fix stupid mistake.
| author | Henrik Enberg <henrik.enberg@telia.com> |
|---|---|
| date | Wed, 18 Jan 2006 22:12:00 +0000 |
| parents | a91053376300 |
| children | c7e0b3b9c888 |
| files | lisp/mail/rmail.el |
| diffstat | 1 files changed, 7 insertions(+), 7 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mail/rmail.el Wed Jan 18 21:58:02 2006 +0000 +++ b/lisp/mail/rmail.el Wed Jan 18 22:12:00 2006 +0000 @@ -799,12 +799,12 @@ (get-buffer-create (file-name-nondirectory file-name))) (when (file-exists-p file-name) (insert-file-contents-literally file-name)) - (setq buffer-file-name file-name)) - ;; As we have read a file as raw-text, the buffer is set to - ;; unibyte. We must make it multibyte if necessary. - (if (and rmail-enable-multibyte - (not enable-multibyte-characters)) - (set-buffer-multibyte t))) + (setq buffer-file-name file-name) + ;; As we have read a file as raw-text, the buffer is set to + ;; unibyte. We must make it multibyte if necessary. + (if (and rmail-enable-multibyte + (not enable-multibyte-characters)) + (set-buffer-multibyte t)))) ;; Make sure we're in rmail-mode, even if the buffer did exist and ;; the file was not changed. (unless (eq major-mode 'rmail-mode) @@ -866,7 +866,7 @@ (unless (memq coding-system '(undecided undecided-unix)) (set-buffer-modified-p t) ;; avoid locking when decoding (let ((buffer-undo-list t)) - (decode-coding-region from to coding-system)) + (decode-coding-region (point-min) (point-max) coding-system)) (setq coding-system last-coding-system-used)) (set-buffer-modified-p modifiedp) (setq buffer-file-coding-system nil)