summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2016-04-29 22:44:13 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2016-04-29 22:44:13 +0200
commit8f3a6de5e240910845594e079b2734a1acc1c25c (patch)
treed175ce37b18d1b314597a81cc22d74aeb149fab0
parent2c3ab9b6e39a3d600e7d82deacc24effaec051bb (diff)
Warning fix in jit-lock-mode
* lisp/jit-lock.el (jit-lock-mode): Don't issue a warning when turning the mode on in an indirect buffer, if this somehow has happened (bug#17738).
-rw-r--r--lisp/jit-lock.el8
1 files changed, 5 insertions, 3 deletions
diff --git a/lisp/jit-lock.el b/lisp/jit-lock.el
index 810c220516..c49fa6ed6c 100644
--- a/lisp/jit-lock.el
+++ b/lisp/jit-lock.el
@@ -195,9 +195,11 @@ the variable `jit-lock-stealth-nice'.
If you need to debug code run from jit-lock, see `jit-lock-debug-mode'."
(setq jit-lock-mode arg)
(cond
- ((buffer-base-buffer)
- ;; We're in an indirect buffer. This doesn't work because jit-lock relies
- ;; on the `fontified' text-property which is shared with the base buffer.
+ ((and (buffer-base-buffer)
+ jit-lock-mode)
+ ;; We're in an indirect buffer, and we're turning the mode on.
+ ;; This doesn't work because jit-lock relies on the `fontified'
+ ;; text-property which is shared with the base buffer.
(setq jit-lock-mode nil)
(message "Not enabling jit-lock: it does not work in indirect buffer"))