* lisp/whitespace.el (whitespace-color-on, whitespace-color-off): Only

call `font-lock-fontify-buffer' when `font-lock-mode' is on.
This commit is contained in:
Dmitry Gutov 2013-04-06 02:22:12 +04:00
parent 134abf1fae
commit d695cb94fb
2 changed files with 9 additions and 2 deletions

View file

@ -3,6 +3,11 @@
* emacs-lisp/package.el (package-compute-transaction): Fix last fix.
Suggested by Donald Curtis <dcurtis@coe.edu> (bug#14082).
2013-04-05 Dmitry Gutov <dgutov@yandex.ru>
* whitespace.el (whitespace-color-on, whitespace-color-off): Only
call `font-lock-fontify-buffer' when `font-lock-mode' is on.
2013-04-05 Jacek Chrząszcz <chrzaszcz@mimuw.edu.pl> (tiny change)
* ispell.el (ispell-set-spellchecker-params):

View file

@ -2243,7 +2243,8 @@ resultant list will be returned."
(whitespace-space-after-tab-regexp 'space)))
1 whitespace-space-after-tab t)))))
(font-lock-add-keywords nil whitespace-font-lock-keywords t)
(font-lock-fontify-buffer)))
(when font-lock-mode
(font-lock-fontify-buffer))))
(defun whitespace-color-off ()
@ -2253,7 +2254,8 @@ resultant list will be returned."
(remove-hook 'post-command-hook #'whitespace-post-command-hook t)
(remove-hook 'before-change-functions #'whitespace-buffer-changed t)
(font-lock-remove-keywords nil whitespace-font-lock-keywords)
(font-lock-fontify-buffer)))
(when font-lock-mode
(font-lock-fontify-buffer))))
(defun whitespace-trailing-regexp (limit)