emacs-29 11592bcfda6: ; * lisp/nxml/xmltok.el (xmltok-scan-attributes): Fix last change

[Gregory Heytings]

branch: emacs-29
commit 11592bcfda6cf85d797d333072453c98994790e1
Author: Gregory Heytings <gregory@heytings.org>
Commit: Gregory Heytings <gregory@heytings.org>

    ; * lisp/nxml/xmltok.el (xmltok-scan-attributes): Fix last change
---
 lisp/nxml/xmltok.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/nxml/xmltok.el b/lisp/nxml/xmltok.el
index fb852e5ea5e..6f9df554da0 100644
--- a/lisp/nxml/xmltok.el
+++ b/lisp/nxml/xmltok.el
@@ -738,7 +738,7 @@ and VALUE-END, otherwise a STRING giving the value."
                      ;; avoid slowdowns due to the quadratic
                      ;; complexity of the regexp.  See bug#61514.
                      (when (with-restriction
-                             (point) (+ (point) 10000)
+                             (point) (min (+ (point) 10000) (point-max))
                              (looking-at (concat "[^<>\n]+?"
                                                  (xmltok-attribute regexp))))
                        (unless recovering