diff options
-rw-r--r-- | lisp/ChangeLog | 4 | ||||
-rw-r--r-- | lisp/mail/rmailmm.el | 6 |
2 files changed, 9 insertions, 1 deletions
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 <rgm@gnu.org> + + * mail/rmailmm.el (rmail-mime): Decode in fundamental-mode. (Bug#4993) + 2009-11-20 Ken Brown <kbrown@cornell.edu> (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))) |