[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/jit-lock.el,v
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/jit-lock.el,v |
Date: |
Tue, 26 Sep 2006 15:42:30 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Stefan Monnier <monnier> 06/09/26 15:42:29
Index: jit-lock.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/jit-lock.el,v
retrieving revision 1.57
retrieving revision 1.58
diff -u -b -r1.57 -r1.58
--- jit-lock.el 26 Sep 2006 15:35:34 -0000 1.57
+++ jit-lock.el 26 Sep 2006 15:42:29 -0000 1.58
@@ -397,19 +397,19 @@
;; eagerly extend the refontified region with
;; jit-lock-after-change-extend-region-functions.
(when (< start orig-start)
- (run-with-timer 0 nil 'jit-lock-fontify-again
+ (run-with-timer 0 nil 'jit-lock-force-redisplay
(current-buffer) start orig-start))
;; Find the start of the next chunk, if any.
(setq start (text-property-any next end 'fontified nil))))))))
-(defun jit-lock-fontify-again (buf start end)
- "Fontify in buffer BUF from START to END."
- ;; Don't bother refontifying text that's not even displayed.
- (when (setq start (text-property-not-all start end 'fontified nil buf))
+(defun jit-lock-force-redisplay (buf start end)
+ "Force the display engine to re-render buffer BUF from START to END."
(with-current-buffer buf
(with-buffer-prepared-for-jit-lock
- (put-text-property start end 'fontified nil)))))
+ ;; Don't cause refontification (it's already been done), but just do
+ ;; some random buffer change, so as to force redisplay.
+ (put-text-property start end 'fontified t)))))