]> git.eshelyaron.com Git - emacs.git/commitdiff
Complete fix for eww-tests.el
authorMichael Albinus <michael.albinus@gmx.de>
Sat, 20 Apr 2024 07:43:30 +0000 (09:43 +0200)
committerEshel Yaron <me@eshelyaron.com>
Sat, 20 Apr 2024 11:11:16 +0000 (14:11 +0300)
* test/lisp/net/eww-tests.el (eww-test/readable/toggle-display)
(eww-test/readable/default-readable): Check for libxml.  (Bug#70472)

(cherry picked from commit 3af9c33263df84f7a16bc07991f99352259121eb)

test/lisp/net/eww-tests.el

index 84767b2d9323a3e180d5381cedcc883d40699dee..4ba51da408ffcf2c556ccb9f07aec5c11492834e 100644 (file)
@@ -197,6 +197,7 @@ This sets `eww-before-browse-history-function' to
 
 (ert-deftest eww-test/readable/toggle-display ()
   "Test toggling the display of the \"readable\" parts of a web page."
+  (skip-unless (libxml-available-p))
   (eww-test--with-mock-retrieve
     (let* ((shr-width most-positive-fixnum)
            (shr-use-fonts nil)
@@ -234,7 +235,8 @@ This sets `eww-before-browse-history-function' to
 
 (ert-deftest eww-test/readable/default-readable ()
   "Test that EWW displays readable parts of pages by default when applicable."
-    (eww-test--with-mock-retrieve
+  (skip-unless (libxml-available-p))
+  (eww-test--with-mock-retrieve
     (let* ((eww-test--response-function
             (lambda (_url)
               (concat "Content-Type: text/html\n\n"