From d73a0317a0478d1b1ab11cfaf479fe08ea23c0e7 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Sat, 21 Nov 2009 02:36:54 +0000 Subject: [PATCH] (rmail-mime): Decode in fundamental-mode. (Bug#4993) --- lisp/ChangeLog | 4 ++++ lisp/mail/rmailmm.el | 6 +++++- 2 files changed, 9 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index ba2f222cf8f..365442c2a62 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2009-11-21 Glenn Morris + + * mail/rmailmm.el (rmail-mime): Decode in fundamental-mode. (Bug#4993) + 2009-11-20 Ken Brown (tiny change) * net/browse-url.el (browse-url-default-windows-browser): Use diff --git a/lisp/mail/rmailmm.el b/lisp/mail/rmailmm.el index 29aa869523e..41704cf5187 100644 --- a/lisp/mail/rmailmm.el +++ b/lisp/mail/rmailmm.el @@ -451,10 +451,14 @@ attachments as specfied by `rmail-mime-attachment-dirs-alist'." (set-buffer buf) (setq buffer-undo-list t) (let ((inhibit-read-only t)) + ;; Decoding the message in fundamental mode for speed, only + ;; switching to rmail-mime-mode at the end for display. Eg + ;; quoted-printable-decode-region gets very slow otherwise (Bug#4993). + (fundamental-mode) (erase-buffer) (insert data) - (rmail-mime-mode) (rmail-mime-show t) + (rmail-mime-mode) (set-buffer-modified-p nil)) (view-buffer buf))) -- 2.39.5