Mercurial > emacs
diff lisp/gnus/gnus-art.el @ 110813:794e89c10dc1
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.
author | Katsumi Yamaoka <yamaoka@jpl.org> |
---|---|
date | Fri, 08 Oct 2010 02:12:56 +0000 |
parents | 74a0e8ad7447 |
children | 236342431786 |
line wrap: on
line diff
--- a/lisp/gnus/gnus-art.el Fri Oct 08 01:51:08 2010 +0000 +++ b/lisp/gnus/gnus-art.el Fri Oct 08 02:12:56 2010 +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)