summaryrefslogtreecommitdiff
path: root/lisp/font-lock.el
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2022-01-24 11:55:57 +0100
committerLars Ingebrigtsen <larsi@gnus.org>2022-01-24 11:56:35 +0100
commit77b72f77b3a5d13fc6e71746dee2cf68305057e2 (patch)
treef3fd8417442fb68285b068ac1e50dc2c0a64a2d6 /lisp/font-lock.el
parent806a1210070cc3ed9f6433bbd37e3975bc7b4e5c (diff)
downloademacs-77b72f77b3a5d13fc6e71746dee2cf68305057e2.tar.gz
emacs-77b72f77b3a5d13fc6e71746dee2cf68305057e2.tar.bz2
emacs-77b72f77b3a5d13fc6e71746dee2cf68305057e2.zip
Make `font-lock-add-keywords' work in derived modes
* lisp/font-lock.el (font-lock-set-defaults): Make `font-lock-add-keywords' work in derived modes (bug#24176).
Diffstat (limited to 'lisp/font-lock.el')
-rw-r--r--lisp/font-lock.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/font-lock.el b/lisp/font-lock.el
index 083bfb8626b..d8a1fe399b6 100644
--- a/lisp/font-lock.el
+++ b/lisp/font-lock.el
@@ -1906,8 +1906,9 @@ preserve `hi-lock-mode' highlighting patterns."
Sets various variables using `font-lock-defaults' and
`font-lock-maximum-decoration'."
;; Set fontification defaults if not previously set for correct major mode.
- (unless (and font-lock-set-defaults
- (eq font-lock-major-mode major-mode))
+ (when (or (not font-lock-set-defaults)
+ (not font-lock-major-mode)
+ (not (derived-mode-p font-lock-major-mode)))
(setq font-lock-major-mode major-mode)
(setq font-lock-set-defaults t)
(let* ((defaults font-lock-defaults)