From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Mon, 4 Jul 2022 10:37:17 +0000 (+0200)
Subject: Don't bug out in manual-html-fix-index-2 on newer makeinfo versions
X-Git-Tag: emacs-28.1.91~68
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=28c5c27162f227a1aae466de9ad52fb146ce63c2;p=emacs.git

Don't bug out in manual-html-fix-index-2 on newer makeinfo versions

Backport from master.

* admin/admin.el (manual-html-fix-index-2): Don't bug out if the
makeinfo version doesn't include <ul>.

(cherry picked from commit e0e3f2b672bc42da52ac9c7596c7560a88684651)
---

diff --git a/admin/admin.el b/admin/admin.el
index 2a597e624bc..67cbf85a32a 100644
--- a/admin/admin.el
+++ b/admin/admin.el
@@ -607,7 +607,7 @@ style=\"text-align:left\">")
       ;; its original form.
       (when (or (search-forward "<ul class=\"menu\">" nil t)
 	        ;; FIXME?  The following search seems dangerously lax.
-	        (search-forward "<ul>"))
+	        (search-forward "<ul>" nil t))
         ;; Convert the list that Makeinfo made into a table.
         (replace-match "<table style=\"float:left\" width=\"100%\">")
         (forward-line 1)