Mercurial > emacs
changeset 33780:00803fb0f58e
(hi-lock-refontify): Don't call non-existent
jit-lock-fontify-buffer; it should anyway be unneccessary to
dp anything special when jit-lock is active.
(hi-yellow, hi-pink, hi-green, hi-blue): Fix defface specs.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Wed, 22 Nov 2000 19:44:43 +0000 |
parents | fc86d4af30bb |
children | 67e0378863cf |
files | lisp/hi-lock.el |
diffstat | 1 files changed, 6 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/hi-lock.el Wed Nov 22 19:38:25 2000 +0000 +++ b/lisp/hi-lock.el Wed Nov 22 19:44:43 2000 +0000 @@ -119,25 +119,26 @@ :group 'hi-lock-interactive-text-highlighting) (defface hi-yellow - '((((background dark)) (:background "yellow" :foreground "black")) + '((((background dark)) + (:background "yellow" :foreground "black")) (t (:background "yellow"))) "Default face for hi-lock mode." :group 'hi-lock-faces) (defface hi-pink - '(((background dark) (:background "pink" :foreground "black")) + '((((background dark)) (:background "pink" :foreground "black")) (t (:background "pink"))) "Face for hi-lock mode." :group 'hi-lock-faces) (defface hi-green - '(((background dark) (:background "green" :foreground "black")) + '((((background dark)) (:background "green" :foreground "black")) (t (:background "green"))) "Face for hi-lock mode." :group 'hi-lock-faces) (defface hi-blue - '(((background dark) (:background "light blue" :foreground "black")) + '((((background dark)) (:background "light blue" :foreground "black")) (t (:background "light blue"))) "Face for hi-lock mode." :group 'hi-lock-faces) @@ -477,7 +478,7 @@ (interactive) (font-lock-unfontify-buffer) (cond - (jit-lock-mode (jit-lock-fontify-buffer)) + (jit-lock-mode nil) ;; Need a better way, since this assumes too much about lazy lock. (lazy-lock-mode (let ((windows (get-buffer-window-list (current-buffer) 'nomini t)))