emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] /srv/bzr/emacs/trunk r105353: mm-decode.el (mm-dissect-buf


From: Katsumi Yamaoka
Subject: [Emacs-diffs] /srv/bzr/emacs/trunk r105353: mm-decode.el (mm-dissect-buffer): Add a default content-disposition in mm handle if none is specified.
Date: Fri, 29 Jul 2011 09:29:35 +0000
User-agent: Bazaar (2.3.1)

------------------------------------------------------------
revno: 105353
author: Daniel Dehennin <address@hidden>
committer: Katsumi Yamaoka <address@hidden>
branch nick: trunk
timestamp: Fri 2011-07-29 09:29:35 +0000
message:
  mm-decode.el (mm-dissect-buffer): Add a default content-disposition in mm 
handle if none is specified.
modified:
  lisp/gnus/ChangeLog
  lisp/gnus/mm-decode.el
=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog       2011-07-24 22:15:15 +0000
+++ b/lisp/gnus/ChangeLog       2011-07-29 09:29:35 +0000
@@ -1,3 +1,8 @@
+2011-07-29  Daniel Dehennin  <address@hidden>
+
+       * mm-decode.el (mm-dissect-buffer): Add a default content-disposition
+       in mm handle if none is specified.
+
 2011-07-24  Andrew Cohen  <address@hidden>
 
        * nnimap.el (nnimap-make-thread-query): Quote message-ids for gmail.

=== modified file 'lisp/gnus/mm-decode.el'
--- a/lisp/gnus/mm-decode.el    2011-07-05 22:27:16 +0000
+++ b/lisp/gnus/mm-decode.el    2011-07-29 09:29:35 +0000
@@ -564,7 +564,13 @@
          (setq ct (mail-fetch-field "content-type")
                ctl (and ct (mail-header-parse-content-type ct))
                cte (mail-fetch-field "content-transfer-encoding")
-               cd (mail-fetch-field "content-disposition")
+                cd (or (mail-fetch-field "content-disposition")
+                       (when (and ctl
+                                  (eq 'mm-inline-text
+                                      (cadr (mm-assoc-string-match
+                                             mm-inline-media-tests
+                                             (car ctl)))))
+                         "inline"))
                ;; 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")


reply via email to

[Prev in Thread] Current Thread [Next in Thread]