1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00

(normal-mode): If font lock is on, turn it off and on.

This commit is contained in:
Richard M. Stallman 2005-08-20 21:50:48 +00:00
parent 23bb94bb4a
commit 6e86be0b47
2 changed files with 19 additions and 0 deletions

View file

@ -1733,6 +1733,12 @@ in that case, this function acts as if `enable-local-variables' were t."
(set-auto-mode))
(report-errors "File local-variables error: %s"
(hack-local-variables)))
;; Turn font lock off and on, to make sure it takes account of
;; whatever file local variables are relevant to it.
(when (and font-lock-mode (eq (car font-lock-keywords) t))
(setq font-lock-keywords (cadr font-lock-keywords))
(font-lock-mode 1))
(if (fboundp 'ucs-set-table-for-input) ; don't lose when building
(ucs-set-table-for-input)))