Mercurial > emacs
diff lisp/gnus/mm-decode.el @ 31764:54ae1def18cf
Merge from Gnus trunk.
author | Dave Love <fx@gnu.org> |
---|---|
date | Wed, 20 Sep 2000 11:46:48 +0000 |
parents | 6b20b7e85e3c |
children | 480df1496aef |
line wrap: on
line diff
--- a/lisp/gnus/mm-decode.el Wed Sep 20 11:22:36 2000 +0000 +++ b/lisp/gnus/mm-decode.el Wed Sep 20 11:46:48 2000 +0000 @@ -119,6 +119,7 @@ ("text/x-patch" mm-display-patch-inline (lambda (handle) (locate-library "diff-mode"))) + ("application/emacs-lisp" mm-display-elisp-inline identity) ("text/html" mm-inline-text (lambda (handle) @@ -153,7 +154,7 @@ (defcustom mm-inlined-types '("image/.*" "text/.*" "message/delivery-status" "message/rfc822" - "message/partial" + "message/partial" "application/emacs-lisp" "application/pgp-signature") "List of media types that are to be displayed inline." :type '(repeat string) @@ -162,7 +163,8 @@ (defcustom mm-automatic-display '("text/plain" "text/enriched" "text/richtext" "text/html" "text/x-vcard" "image/.*" "message/delivery-status" "multipart/.*" - "message/rfc822" "text/x-patch" "application/pgp-signature") + "message/rfc822" "text/x-patch" "application/pgp-signature" + "application/emacs-lisp") "A list of MIME types to be displayed automatically." :type '(repeat string) :group 'mime-display)