1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-11 09:20:51 +00:00

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

This commit is contained in:
Gregory Heytings 2023-03-18 15:04:26 +00:00
parent 33a2670368
commit 11592bcfda

View File

@ -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