Mercurial > emacs
changeset 112241:98276eb8b0ed
Fix handling of unknown MIME type (bug#7651).
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Tue, 04 Jan 2011 16:10:30 +0900 |
parents | ca0df3b7fb20 (current diff) 6fd3dcdcc675 (diff) |
children | 6de29881faa6 438860427833 |
files | |
diffstat | 2 files changed, 15 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Mon Jan 03 22:26:22 2011 +0100 +++ b/lisp/ChangeLog Tue Jan 04 16:10:30 2011 +0900 @@ -1,3 +1,10 @@ +2011-01-04 Kenichi Handa <handa@m17n.org> + + * mail/rmailmm.el (rmail-mime-insert-bulk): Display an unknown + part as a plain text. + (rmail-mime-process-multipart): Set the default content-type to + nil for unknown multipart subtypes (bug#7651). + 2011-01-03 Brent Goodrick <bgoodr@gmail.com> (tiny change) * abbrev.el (prepare-abbrev-list-buffer): If listing local abbrev
--- a/lisp/mail/rmailmm.el Mon Jan 03 22:26:22 2011 +0100 +++ b/lisp/mail/rmailmm.el Tue Jan 04 16:10:30 2011 +0900 @@ -741,7 +741,11 @@ (cond ((eq (cdr bulk-data) 'text) (rmail-mime-insert-decoded-text entity)) ((cdr bulk-data) - (rmail-mime-insert-image entity))))) + (rmail-mime-insert-image entity)) + (t + ;; As we don't know how to display the body, just + ;; insert it as a text. + (rmail-mime-insert-decoded-text entity))))) (put-text-property beg (point) 'rmail-mime-entity entity))) (defun test-rmail-mime-bulk-handler () @@ -819,7 +823,9 @@ (cond ((string-match "mixed" subtype) (setq content-type '("text/plain"))) ((string-match "digest" subtype) - (setq content-type '("message/rfc822")))) + (setq content-type '("message/rfc822"))) + (t + (setq content-type nil))) ;; Loop over all body parts, where beg points at the beginning of ;; the part and end points at the end of the part. next points at