Mercurial > emacs
diff lisp/gnus/mm-decode.el @ 103570:21ddc18f8c1b
(mm-dissect-buffer): Use message-fetch-field instead of mail-fetch-field to
fetch Content-Description header in order to exclude newlines.
| author | Katsumi Yamaoka <yamaoka@jpl.org> |
|---|---|
| date | Tue, 23 Jun 2009 22:38:22 +0000 |
| parents | a9dc0e7c3f2b |
| children | 1d1d5d9bd884 |
line wrap: on
line diff
--- a/lisp/gnus/mm-decode.el Tue Jun 23 14:14:13 2009 +0000 +++ b/lisp/gnus/mm-decode.el Tue Jun 23 22:38:22 2009 +0000 @@ -563,7 +563,9 @@ ctl (and ct (mail-header-parse-content-type ct)) cte (mail-fetch-field "content-transfer-encoding") cd (mail-fetch-field "content-disposition") - description (mail-fetch-field "content-description") + ;; Newlines in description should be stripped so as + ;; not to break the MIME tag into two or more lines. + description (message-fetch-field "content-description") id (mail-fetch-field "content-id")) (unless from (setq from (mail-fetch-field "from")))