Changes committed gnus/lisp (ChangeLog mm-decode.el)

"Katsumi Yamaoka" <[email protected]> Wed, 24 Jun 2009 00:39:00 +0200
Newsgroups gmane.emacs.gnus.commits
Message-ID <[email protected]>
Modified: ChangeLog 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.


Index: ChangeLog
diff -u gnus/lisp/ChangeLog:7.1998 gnus/lisp/ChangeLog:7.1999
--- ChangeLog:7.1998	Fri Jun 19 02:33:26 2009
+++ ChangeLog	Wed Jun 24 00:39:00 2009
@@ -1,3 +1,9 @@
+2009-06-22  Katsumi Yamaoka  <[email protected]>
+
+	* 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-18  Ulrich Mueller  <[email protected]>
 
 	* pgg-gpg.el (pgg-gpg-lookup-key-owner): Handle colon listings
Index: mm-decode.el
diff -u gnus/lisp/mm-decode.el:7.69 gnus/lisp/mm-decode.el:7.70
--- mm-decode.el:7.69	Thu Jan 22 08:02:16 2009
+++ mm-decode.el	Wed Jun 24 00:39:00 2009
@@ -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")))