changeset 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 94291b33e4a6
children a4c64847c698
files lisp/gnus/ChangeLog lisp/gnus/mm-decode.el
diffstat 2 files changed, 9 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/gnus/ChangeLog	Tue Jun 23 14:14:13 2009 +0000
+++ b/lisp/gnus/ChangeLog	Tue Jun 23 22:38:22 2009 +0000
@@ -1,3 +1,9 @@
+2009-06-22  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+	* mm-decode.el (mm-dissect-buffer): Use message-fetch-field instead of
+	mail-fetch-field to fetch Content-Description header in order to
+	exclude newlines.
+
 2009-06-01  Katsumi Yamaoka  <yamaoka@jpl.org>
 
 	* gnus-art.el (gnus-mime-delete-part): Specify gnus-decoded as charset
--- 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")))