From: Glenn Morris Date: Thu, 4 Feb 2010 05:10:21 +0000 (-0800) Subject: * mail/rmail.el (rmail-show-message-1): Handle malformed X-Git-Tag: emacs-pretest-23.1.93~115 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a03ae20dc626510a7e05d5dd8cb7e853d70f2b49;p=emacs.git * mail/rmail.el (rmail-show-message-1): Handle malformed quoted-printable text. (Bug#5441) --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index dbd40d088e8..f81a3d16913 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2010-02-04 Glenn Morris + * mail/rmail.el (rmail-show-message-1): Handle malformed + quoted-printable text. (Bug#5441) + * mail/mail-utils.el (mail-unquote-printable-region): Doc fix. * simple.el (visual-line-mode): Capitalize lighter. diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index 1dbfceb315b..a737b99c29e 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el @@ -2727,8 +2727,10 @@ The current mail message becomes the message displayed." (insert-buffer-substring mbox-buf body-start end) (cond ((string= character-coding "quoted-printable") - (mail-unquote-printable-region (point-min) (point-max) - nil nil 'unibyte)) + ;; See bug#5441. + (or (mail-unquote-printable-region (point-min) (point-max) + nil t 'unibyte) + (message "Malformed MIME quoted-printable message"))) ((and (string= character-coding "base64") is-text-message) (base64-decode-region (point-min) (point-max))) ((eq character-coding 'uuencode)