Commit c4ac63d0 authored by Stefan Monnier's avatar Stefan Monnier
Browse files

(jit-lock-fontify-now): Move jit-lock-context-unfontify-pos.

parent c1bed3aa
2005-10-17 Stefan Monnier <>
* jit-lock.el (jit-lock-fontify-now):
Move jit-lock-context-unfontify-pos to avoid wasted work.
2005-10-17 Michael Albinus <>
* net/tramp.el (tramp-completion-mode): New defvar. Used in
......@@ -33,7 +38,7 @@
* savehist.el: Don't require CL at runtime.
(savehist-xemacs): Remove.
(savehist-coding-system): Use utf-8 if available, regardless of religion.
(savehist-coding-system): Use utf-8 if present, regardless of religion.
(savehist-no-conversion): Use (featurep 'xemacs).
(savehist-load): Check existence of start-itimer rather than XEmacs.
Use an idle timer.
......@@ -156,14 +161,13 @@
* toolbar/gud-up.*: Moved to etc/images/gud/up.*.
* toolbar/gud-watch.*: Moved to etc/images/gud/watch.*.
* progmodes/gud.el (gud-tool-bar-map): Renamed the images
* progmodes/gud.el (gud-tool-bar-map): Rename the images
appropriately (for example, gud-break to gud/break).
2005-10-14 Chong Yidong <>
* longlines.el (longlinges-search-function)
(longlines-search-forward, longlines-search-backward): New
(longlines-search-forward, longlines-search-backward): New functions.
(longlines-mode): Set isearch-search-fun-function to
......@@ -349,6 +349,16 @@ Defaults to the whole buffer. END can be out of bounds."
(goto-char next) (setq next (line-beginning-position 2))
(goto-char start) (setq start (line-beginning-position))
;; Make sure the contextual refontification doesn't re-refontify
;; what's already been refontified.
(when jit-lock-context-unfontify-pos
(if (and (< jit-lock-context-unfontify-pos next)
(when (and jit-lock-context-unfontify-pos
(< jit-lock-context-unfontify-pos next)
(>= jit-lock-context-unfontify-pos start))
(setq jit-lock-context-unfontify-pos next)))
(setq jit-lock-context-unfontify-pos next))
;; Fontify the chunk, and mark it as fontified.
;; We mark it first, to make sure that we don't indefinitely
;; re-execute this fontification if an error occurs.
......@@ -566,9 +576,14 @@ will take place when text is fontified stealthily."
;; Mark the change for deferred contextual refontification.
(when jit-lock-context-unfontify-pos
(setq jit-lock-context-unfontify-pos
;; Here we use `start' because nothing guarantees that the
;; text between start and end will be otherwise refontified:
;; usually it will be refontified by virtue of being
;; displayed, but if it's outside of any displayed area in the
;; buffer, only jit-lock-context-* will re-fontify it.
(min jit-lock-context-unfontify-pos start))))))
(provide 'jit-lock)
;;; arch-tag: 56b5de6e-f581-453b-bb97-49c39372ff9e
;; arch-tag: 56b5de6e-f581-453b-bb97-49c39372ff9e
;;; jit-lock.el ends here
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment