From e8eaf38e633cd3f7f4a2efc666b7fb1ad690fc25 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Ulrich=20M=C3=BCller?= Date: Fri, 21 Feb 2025 09:58:16 +0100 Subject: [PATCH] ; Skip image type test if support is missing * test/lisp/image-tests.el (image-type-from-file-name): Skip if image types are not available. (Bug#76462) (cherry picked from commit cc51bd569874cd89a7fa1c3241033e69a5c2dd01) --- test/lisp/image-tests.el | 3 +++ 1 file changed, 3 insertions(+) diff --git a/test/lisp/image-tests.el b/test/lisp/image-tests.el index 69557c83657..03d20758052 100644 --- a/test/lisp/image-tests.el +++ b/test/lisp/image-tests.el @@ -88,6 +88,9 @@ (should-not (image-supported-file-p "foo.some-unsupported-format"))) (ert-deftest image-type-from-file-name () + (skip-unless (and (image-type-available-p 'jpeg) + (image-type-available-p 'png) + (image-type-available-p 'webp))) (with-suppressed-warnings ((obsolete image-type-from-file-name)) (should (eq (image-type-from-file-name "foo.jpg") 'jpeg)) (should (eq (image-type-from-file-name "foo.png") 'png)) -- 2.39.5