[Emacs-diffs] Changes to emacs/lisp/jit-lock.el,v

[Stefan Monnier]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Stefan Monnier <monnier>        06/08/17 15:10:22

Index: jit-lock.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/jit-lock.el,v
retrieving revision 1.53
retrieving revision 1.54
diff -u -b -r1.53 -r1.54
--- jit-lock.el 3 Aug 2006 03:35:45 -0000       1.53
+++ jit-lock.el 17 Aug 2006 15:10:21 -0000      1.54
@@ -391,9 +391,10 @@
                            (buf (current-buffer)))
                (run-with-timer
                 0 nil (lambda ()
+                        (with-current-buffer buf
                         (with-buffer-prepared-for-jit-lock
                             (put-text-property start orig-start
-                                               'fontified t buf))))))
+                                                 'fontified t)))))))
 
           ;; Find the start of the next chunk, if any.
           (setq start (text-property-any next end 'fontified nil))))))))
@@ -577,10 +578,10 @@
 The extended region to refontify is returned indirectly by modifying
 the variables `jit-lock-start' and `jit-lock-end'.
 
-Note that extending the region this way is not strictly necessary,
-except that the nature of the redisplay code tends to otherwise leave
-some of the rehighlighted text displayed with the old highlight until the
-next redisplay.  See comment in `jit-lock-fontify-now'.")
+Note that extending the region this way is not strictly necessary, except
+that the nature of the redisplay code tends to otherwise leave some of
+the rehighlighted text displayed with the old highlight until the next
+redisplay (see comment about repeated redisplay in `jit-lock-fontify-now').")
 
 (defun jit-lock-after-change (start end old-len)
   "Mark the rest of the buffer as not fontified after a change.