# HG changeset patch # User Stefan Monnier # Date 961262514 0 # Node ID 69ac77ea153cf33f5f7a59f2fe3c1828bd212e07 # Parent f37b857741b1503f124d16697f3407322a3105bd (font-lock-after-fontify-buffer) (font-lock-after-unfontify-buffer): No need to call back to jit-lock. diff -r f37b857741b1 -r 69ac77ea153c lisp/font-lock.el --- a/lisp/font-lock.el Sat Jun 17 17:17:35 2000 +0000 +++ b/lisp/font-lock.el Sat Jun 17 17:21:54 2000 +0000 @@ -1098,16 +1098,23 @@ (defun font-lock-after-fontify-buffer () (cond (fast-lock-mode (fast-lock-after-fontify-buffer)) - (jit-lock-mode - (jit-lock-after-fontify-buffer)) + ;; Useless now that jit-lock intercepts font-lock-fontify-buffer. -sm + ;; (jit-lock-mode + ;; (jit-lock-after-fontify-buffer)) (lazy-lock-mode (lazy-lock-after-fontify-buffer)))) (defun font-lock-after-unfontify-buffer () (cond (fast-lock-mode (fast-lock-after-unfontify-buffer)) - (jit-lock-mode - (jit-lock-after-unfontify-buffer)) + ;; Useless as well. It's only called when: + ;; - turning off font-lock: it does not matter if we leave spurious + ;; `fontified' text props around since jit-lock-mode is also off. + ;; - font-lock-default-fontify-buffer fails: this is not run + ;; any more anyway. -sm + ;; + ;; (jit-lock-mode + ;; (jit-lock-after-unfontify-buffer)) (lazy-lock-mode (lazy-lock-after-unfontify-buffer)))) @@ -3163,6 +3170,7 @@ ;; Install ourselves: +;; Useful for the popup-menu for mouse-3 on the modeline. (unless (assq 'font-lock-mode minor-mode-alist) (push '(font-lock-mode nil) minor-mode-alist))