From 9df254119c4de577f273cf1ec1a5892a3509da20 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Wed, 30 Oct 2019 15:04:17 +0100 Subject: [PATCH] Make font-lock-refontify try even harder to refontify * lisp/font-lock.el (font-lock-refontify): Make this command work even after switching global font lock mode on and then off again. --- lisp/font-lock.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/font-lock.el b/lisp/font-lock.el index 971e37309e9..2c91586c99d 100644 --- a/lisp/font-lock.el +++ b/lisp/font-lock.el @@ -1107,7 +1107,9 @@ locking for a mode, and is not meant to be called from lisp functions." (interactive) (declare (interactive-only t)) (setq font-lock-major-mode nil) - (font-lock-ensure)) + (font-lock-set-defaults) + (save-excursion + (font-lock-fontify-region (point-min) (point-max)))) (defun font-lock-ensure (&optional beg end) "Make sure the region BEG...END has been fontified. -- 2.39.5