Mercurial > emacs
changeset 72431:f13889b47192
(jit-lock-fontify-now): Protect the modified status of the right buffer.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Thu, 17 Aug 2006 15:10:21 +0000 |
| parents | c5805198a585 |
| children | ceec9309d859 |
| files | lisp/ChangeLog lisp/jit-lock.el |
| diffstat | 2 files changed, 13 insertions(+), 7 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Thu Aug 17 14:53:09 2006 +0000 +++ b/lisp/ChangeLog Thu Aug 17 15:10:21 2006 +0000 @@ -1,3 +1,8 @@ +2006-08-17 Martin Rudalics <rudalics@gmx.at> + + * jit-lock.el (jit-lock-fontify-now): Protect the modified status of + the right buffer. + 2006-08-17 Stefan Monnier <monnier@iro.umontreal.ca> * pcvs-parse.el (cvs-parse-table): Accept the new `...' format for
--- a/lisp/jit-lock.el Thu Aug 17 14:53:09 2006 +0000 +++ b/lisp/jit-lock.el Thu Aug 17 15:10:21 2006 +0000 @@ -391,9 +391,10 @@ (buf (current-buffer))) (run-with-timer 0 nil (lambda () - (with-buffer-prepared-for-jit-lock - (put-text-property start orig-start - 'fontified t buf)))))) + (with-current-buffer buf + (with-buffer-prepared-for-jit-lock + (put-text-property start orig-start + '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.