From a9f38b1c2279fec0604a4474de891f88af6b205e Mon Sep 17 00:00:00 2001 From: Jay Kamat Date: Mon, 8 Mar 2021 16:55:37 -0800 Subject: [PATCH] ox-html: Add webp as an inline image format * lisp/ox-html.el (org-html-inline-image-rules): Add webp as an inline image format Webp is an image format introduced in 2010, which now has widespread support in browsers. ox-html can inline webp images identically to how it does already for other image formats. [km: updated package-version keyword and added NEWS entry] Signed-off-by: Jay Kamat --- etc/ORG-NEWS | 4 ++++ lisp/ox-html.el | 9 ++++----- 2 files changed, 8 insertions(+), 5 deletions(-) diff --git a/etc/ORG-NEWS b/etc/ORG-NEWS index 6ecc1f1f1..9fc126b2f 100644 --- a/etc/ORG-NEWS +++ b/etc/ORG-NEWS @@ -101,6 +101,10 @@ that asks whether to clock out and save when there's a running clock. Customize ~org-clock-ask-before-exiting~~ to nil to disable this new behavior. +*** Option ~org-html-inline-image-rules~ now includes .webp + +By default ox-html now inlines webp images. + ** New features *** =ob-python= improvements to =:return= header argument diff --git a/lisp/ox-html.el b/lisp/ox-html.el index 11757bb35..6cb9a3bf4 100644 --- a/lisp/ox-html.el +++ b/lisp/ox-html.el @@ -848,16 +848,15 @@ link to the image." :type 'boolean) (defcustom org-html-inline-image-rules - `(("file" . ,(regexp-opt '(".jpeg" ".jpg" ".png" ".gif" ".svg"))) - ("http" . ,(regexp-opt '(".jpeg" ".jpg" ".png" ".gif" ".svg"))) - ("https" . ,(regexp-opt '(".jpeg" ".jpg" ".png" ".gif" ".svg")))) + `(("file" . ,(regexp-opt '(".jpeg" ".jpg" ".png" ".gif" ".svg" ".webp"))) + ("http" . ,(regexp-opt '(".jpeg" ".jpg" ".png" ".gif" ".svg" ".webp"))) + ("https" . ,(regexp-opt '(".jpeg" ".jpg" ".png" ".gif" ".svg" ".webp")))) "Rules characterizing image files that can be inlined into HTML. A rule consists in an association whose key is the type of link to consider, and value is a regexp that will be matched against link's path." :group 'org-export-html - :version "24.4" - :package-version '(Org . "8.0") + :package-version '(Org . "9.5") :type '(alist :key-type (string :tag "Type") :value-type (regexp :tag "Path")))