1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
|
From 60a4ccd482d6856c7aa1cecf0d9ab2461c27b96d Mon Sep 17 00:00:00 2001
From: Eli Zaretskii <eliz@gnu.org>
Date: Thu, 17 Jul 2025 19:34:50 +0300
Subject: ; * test/lisp/net/shr-tests.el (shr-test/zoom-image): Fix <img>
(bug#79041).
(cherry picked from commit 462a541db904405ede8446c48ba0c71ad41c544d)
README-Debian: The shr-test/zoom image test should now work with libxml2 2.14+
.
This upstream patch has been added to fix the problem:
.
commit 462a541db904405ede8446c48ba0c71ad41c544d
Author: Eli Zaretskii <eliz@gnu.org>
Date: Thu Jul 17 19:34:50 2025 +0300
.
; * test/lisp/net/shr-tests.el (shr-test/zoom-image): Fix <img> (bug#79041).
Bug: https://debbugs.gnu.org/79041
Bug-Debian: https://bugs.debian.org/1106354
---
test/lisp/net/shr-tests.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/test/lisp/net/shr-tests.el b/test/lisp/net/shr-tests.el
index 8d66684c96d..4978db27df5 100644
--- a/test/lisp/net/shr-tests.el
+++ b/test/lisp/net/shr-tests.el
@@ -145,8 +145,8 @@ shr-test/zoom-image
(dolist (alt '(nil "" "nothing to see here"))
(with-temp-buffer
(ert-info ((format "image with alt=%S" alt))
- (let ((attrs (if alt (format " alt=\"%s\"" alt) "")))
- (insert (format "<img src=\"%s\" %s" image-url attrs)))
+ (let ((attrs (if alt (format " alt=\"%s\">" alt) ">")))
+ (insert (format "<img src=\"%s\"%s" image-url attrs)))
(cl-letf* (;; Pretend we're a graphical display.
((symbol-function 'display-graphic-p) #'always)
((symbol-function 'url-queue-retrieve)
|
