aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/gnus/gnus-art.el
diff options
context:
space:
mode:
authorKatsumi Yamaoka <[email protected]>2010-10-08 02:12:56 +0000
committerKatsumi Yamaoka <[email protected]>2010-10-08 02:12:56 +0000
commitf7aa0b8f65e8481309f43a9f71a273c05596956e (patch)
tree29084519be15bb144978ee4be29e5fb9b26906c7 /lisp/gnus/gnus-art.el
parent863b61d662deede3e01d1b0cba8c110064a7407b (diff)
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.
Diffstat (limited to 'lisp/gnus/gnus-art.el')
-rw-r--r--lisp/gnus/gnus-art.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el
index 426a248bc6..01cbda85fd 100644
--- a/lisp/gnus/gnus-art.el
+++ b/lisp/gnus/gnus-art.el
@@ -5381,7 +5381,7 @@ specified charset."
(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 @@ If no internal viewer is available, use an external viewer."
(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)