master 26af1ca9e9 1/2: Make gnus display webp images inline

[Lars Ingebrigtsen]

branch: master
commit 26af1ca9e9a37cf9b42f16b3fbeb41d0a3c4fb35
Author: Visuwesh <visuweshm@gmail.com>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    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 7256e5a2f7..79217d3400 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 8ba7f1bec3..ee72eba35d 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