[Emacs-diffs] master bb55d38: * lisp/font-lock.el (font-lock-ensure-function): Fix bug#33798

[Stefan Monnier]

branch: master
commit bb55d384cdb19a7af0da0c3cdd00ca6967ddd1a9
Author: Stefan Monnier <address@hidden>
Commit: Stefan Monnier <address@hidden>

    * lisp/font-lock.el (font-lock-ensure-function): Fix bug#33798
---
 lisp/font-lock.el | 9 ++-------
 1 file changed, 2 insertions(+), 7 deletions(-)

diff --git a/lisp/font-lock.el b/lisp/font-lock.el
index b4cf5b0..f50a715 100644
--- a/lisp/font-lock.el
+++ b/lisp/font-lock.el
@@ -1093,14 +1093,9 @@ accessible portion of the current buffer."
                 (or beg (point-min)) (or end (point-max)))))
 
 (defvar font-lock-ensure-function
-  (lambda (_beg _end)
+  (lambda (beg end)
     (unless font-lock-fontified
-      (font-lock-default-fontify-buffer)
-      (unless font-lock-mode
-        ;; If font-lock is not enabled, we don't have the hooks in place to
-        ;; track modifications, so a subsequent call to font-lock-ensure can't
-        ;; assume that the fontification is still valid.
-        (setq font-lock-fontified nil))))
+      (font-lock-fontify-region beg end)))
   "Function to make sure a region has been fontified.
 Called with two arguments BEG and END.")