[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r101841: gnus-art.el (gnus-mime-view-
From: |
Katsumi Yamaoka |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r101841: gnus-art.el (gnus-mime-view-part-externally, gnus-mime-view-part-internally): Make predicate function passed to gnus-mime-view-part-as-type assume argument is a mime type, not a list of a mime type. |
Date: |
Fri, 08 Oct 2010 02:12:56 +0000 |
User-agent: |
Bazaar (2.0.3) |
------------------------------------------------------------
revno: 101841
committer: Katsumi Yamaoka <address@hidden>
branch nick: trunk
timestamp: Fri 2010-10-08 02:12:56 +0000
message:
gnus-art.el (gnus-mime-view-part-externally, gnus-mime-view-part-internally):
Make predicate function passed to gnus-mime-view-part-as-type assume argument
is a mime type, not a list of a mime type.
modified:
lisp/gnus/ChangeLog
lisp/gnus/gnus-art.el
=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog 2010-10-08 01:51:08 +0000
+++ b/lisp/gnus/ChangeLog 2010-10-08 02:12:56 +0000
@@ -1,5 +1,10 @@
2010-10-08 Katsumi Yamaoka <address@hidden>
+ * gnus-art.el (gnus-mime-view-part-externally)
+ (gnus-mime-view-part-internally): Make predicate function passed to
+ gnus-mime-view-part-as-type assume argument is a mime type, not a list
+ of a mime type.
+
* shr.el (shr-table-widths): Don't use cl function `reduce'.
2010-10-07 Lars Magne Ingebrigtsen <address@hidden>
=== modified file 'lisp/gnus/gnus-art.el'
--- a/lisp/gnus/gnus-art.el 2010-10-06 02:41:59 +0000
+++ b/lisp/gnus/gnus-art.el 2010-10-08 02:12:56 +0000
@@ -5381,7 +5381,7 @@
(mm-enable-external t))
(if (not (stringp method))
(gnus-mime-view-part-as-type
- nil (lambda (types) (stringp (mailcap-mime-info (car types)))))
+ nil (lambda (type) (stringp (mailcap-mime-info type))))
(when handle
(if (mm-handle-undisplayer handle)
(mm-remove-part handle)
@@ -5402,7 +5402,7 @@
(inhibit-read-only t))
(if (not (mm-inlinable-p handle))
(gnus-mime-view-part-as-type
- nil (lambda (types) (mm-inlinable-p handle (car types))))
+ nil (lambda (type) (mm-inlinable-p handle type)))
(when handle
(if (mm-handle-undisplayer handle)
(mm-remove-part handle)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r101841: gnus-art.el (gnus-mime-view-part-externally, gnus-mime-view-part-internally): Make predicate function passed to gnus-mime-view-part-as-type assume argument is a mime type, not a list of a mime type.,
Katsumi Yamaoka <=