Subject: Re: 30.1; Test failure in shr-test/zoom-image

From: Ulrich Müller <[email-masked]>
Date: Fri, 21 Feb 2025 11:06:20 +0100

Attached patch fixes the problem for me.

>From 423a247e608c485a685f7163088d65d246ed25ec Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ulrich=20M=C3=BCller?= <[email-masked]>
Date: Fri, 21 Feb 2025 10:36:52 +0100
Subject: [PATCH] ; Skip shr-test/zoom-image test if png support is missing

* test/lisp/net/shr-tests.el (shr-test/zoom-image): Skip if png
images are not supported.  (Bug#76464)
---
 test/lisp/net/shr-tests.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/test/lisp/net/shr-tests.el b/test/lisp/net/shr-tests.el
index beb9bfe85a9..402e49c8400 100644
--- a/test/lisp/net/shr-tests.el
+++ b/test/lisp/net/shr-tests.el
@@ -135,7 +135,8 @@ shr-srcset
 
 (ert-deftest shr-test/zoom-image ()
   "Test that `shr-zoom-image' properly replaces the original image."
-  (skip-unless (bound-and-true-p image-types))
+  (skip-unless (and (bound-and-true-p image-types)
+                    (image-type-available-p 'png)))
   (let* ((image (expand-file-name "data/image/blank-100x200.png"
                                   (getenv "EMACS_TEST_DIRECTORY")))
          (image-url (concat "file://" (if (string-prefix-p "/" image)
-- 
2.48.1