From 26af1ca9e9a37cf9b42f16b3fbeb41d0a3c4fb35 Mon Sep 17 00:00:00 2001 From: Visuwesh Date: Thu, 14 Jul 2022 19:41:58 +0200 Subject: [PATCH] Make gnus display webp images inline * lisp/gnus/mm-decode.el (mm-inline-media-tests): Add webp handler. * lisp/net/mailcap.el (mailcap-mime-extensions): Add webp mimetype (bug#56552). --- lisp/gnus/mm-decode.el | 6 +++++- lisp/net/mailcap.el | 1 + 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/gnus/mm-decode.el b/lisp/gnus/mm-decode.el index 7256e5a2f7c..79217d34001 100644 --- a/lisp/gnus/mm-decode.el +++ b/lisp/gnus/mm-decode.el @@ -193,7 +193,11 @@ before the external MIME handler is invoked." `(("image/p?jpeg" mm-inline-image ,(lambda (handle) - (mm-valid-and-fit-image-p 'jpeg handle))) + (mm-valid-and-fit-image-p 'jpeg handle))) + ("image/webp" + mm-inline-image + ,(lambda (handle) + (mm-valid-and-fit-image-p 'webp handle))) ("image/png" mm-inline-image ,(lambda (handle) diff --git a/lisp/net/mailcap.el b/lisp/net/mailcap.el index 8ba7f1bec3d..ee72eba35db 100644 --- a/lisp/net/mailcap.el +++ b/lisp/net/mailcap.el @@ -974,6 +974,7 @@ If NO-DECODE is non-nil, don't decode STRING." (".ai" . "application/postscript") (".jpe" . "image/jpeg") (".jpeg" . "image/jpeg") + (".webp" . "image/webp") (".org" . "text/x-org")) "An alist of file extensions and corresponding MIME content-types. This exists for you to customize the information in Lisp. It is -- 2.39.5