From: Ulrich Müller Date: Fri, 21 Feb 2025 08:58:16 +0000 (+0100) Subject: ; Skip image type test if support is missing X-Git-Tag: archive/raspbian/1%30.1+1-3+rpi1^2~2^2~20^2~9 X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=cc51bd569874cd89a7fa1c3241033e69a5c2dd01;p=emacs.git ; 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) --- 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))