mm-inline-media-tests
mm-inline-media-tests is a variable defined in `
mm-decode.el
'.
Its value is shown
below.
Documentation:
Alist of media types/tests saying whether types can be displayed inline.
You can customize this variable.
Value:
(("image/p?jpeg" mm-inline-image
(lambda
(handle)
(mm-valid-and-fit-image-p 'jpeg handle)))
("image/png" mm-inline-image
(lambda
(handle)
(mm-valid-and-fit-image-p 'png handle)))
("image/gif" mm-inline-image
(lambda
(handle)
(mm-valid-and-fit-image-p 'gif handle)))
("image/tiff" mm-inline-image
(lambda
(handle)
(mm-valid-and-fit-image-p 'tiff handle)))
("image/xbm" mm-inline-image
(lambda
(handle)
(mm-valid-and-fit-image-p 'xbm handle)))
("image/x-xbitmap" mm-inline-image
(lambda
(handle)
(mm-valid-and-fit-image-p 'xbm handle)))
("image/xpm" mm-inline-image
(lambda
(handle)
(mm-valid-and-fit-image-p 'xpm handle)))
("image/x-xpixmap" mm-inline-image
(lambda
(handle)
(mm-valid-and-fit-image-p 'xpm handle)))
("image/bmp" mm-inline-image
(lambda
(handle)
(mm-valid-and-fit-image-p 'bmp handle)))
("image/x-portable-bitmap" mm-inline-image
(lambda
(handle)
(mm-valid-and-fit-image-p 'pbm handle)))
("text/plain" mm-inline-text identity)
("text/enriched" mm-inline-text identity)
("text/richtext" mm-inline-text identity)
("text/x-patch" mm-display-patch-inline identity)
("text/x-diff" mm-display-patch-inline identity)
("application/emacs-lisp" mm-display-elisp-inline identity)
("application/x-emacs-lisp" mm-display-elisp-inline identity)
("application/x-shellscript" mm-display-shell-script-inline identity)
("application/x-sh" mm-display-shell-script-inline identity)
("text/x-sh" mm-display-shell-script-inline identity)
("application/javascript" mm-display-javascript-inline identity)
("text/dns" mm-display-dns-inline identity)
("text/x-org" mm-display-org-inline identity)
("text/html" mm-inline-text-html
(lambda
(handle)
mm-text-html-renderer))
("text/x-vcard" mm-inline-text-vcard
(lambda
(handle)
(or
(featurep 'vcard)
(locate-library "vcard"))))
("message/delivery-status" mm-inline-text identity)
("message/rfc822" mm-inline-message identity)
("message/partial" mm-inline-partial identity)
("message/external-body" mm-inline-external-body identity)
("text/.*" mm-inline-text identity)
("application/x-.?tar\\(-.*\\)?" mm-archive-dissect-and-inline identity)
("application/zip" mm-archive-dissect-and-inline identity)
("audio/wav" mm-inline-audio
(lambda
(handle)
(and
(or
(featurep 'nas-sound)
(featurep 'native-sound))
(device-sound-enabled-p))))
("audio/au" mm-inline-audio
(lambda
(handle)
(and
(or
(featurep 'nas-sound)
(featurep 'native-sound))
(device-sound-enabled-p))))
("application/pgp-signature" ignore identity)
("application/x-pkcs7-signature" ignore identity)
("application/pkcs7-signature" ignore identity)
("application/x-pkcs7-mime" ignore identity)
("application/pkcs7-mime" ignore identity)
("multipart/alternative" ignore identity)
("multipart/mixed" ignore identity)
("multipart/related" ignore identity)
("image/.*" mm-inline-image
(lambda
(handle)
(and
(mm-valid-image-format-p 'imagemagick)
(mm-with-unibyte-buffer
(mm-insert-part handle)
(let
((image
(ignore-errors
(if
(fboundp 'create-image)
(create-image
(buffer-string)
'imagemagick 'data-p)
(mm-create-image-xemacs
(mm-handle-media-subtype handle))))))
(when image
(setcar
(cdr handle)
(list "image/imagemagick"))
(mm-image-fit-p handle)))))))
("audio/.*" ignore ignore)
("image/.*" ignore ignore)
(".*" mm-inline-text mm-readable-p))