Avoid infloop in CPerl mode fontification

* lisp/progmodes/cperl-mode.el
(cperl-font-lock-fontify-region-function): Stop the loop at
EOB, to avoid inflooping there.  (Bug#33114)
This commit is contained in:
Eli Zaretskii 2018-10-25 17:57:34 +03:00
parent 71a2d509f9
commit f3d01d4653

View file

@ -8884,7 +8884,7 @@ do extra unwind via `cperl-unwind-to-safe'."
(goto-char new-beg)))
(setq beg (point))
(goto-char end)
(while (and end
(while (and end (< end (point-max))
(progn
(or (bolp) (condition-case nil
(forward-line 1)