From c5e66afa88d6ff8ad5c42318d85188ed477e7db2 Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Wed, 22 Feb 2017 02:10:36 +0200 Subject: =?UTF-8?q?*=20lisp/isearch.el=20(isearch-lazy-highlight):=20New?= =?UTF-8?q?=20choice=20=E2=80=98all-windows=E2=80=99.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit (isearch-lazy-highlight-update): Check it to decide whether to apply overlays only on the selected window. * lisp/follow.el (follow-mode): Set isearch-lazy-highlight to ‘all-windows’. (Bug#17453, bug#21092) --- lisp/isearch.el | 14 ++++++++++---- 1 file changed, 10 insertions(+), 4 deletions(-) (limited to 'lisp/isearch.el') diff --git a/lisp/isearch.el b/lisp/isearch.el index d0fb15ec641..699d6eaf730 100644 --- a/lisp/isearch.el +++ b/lisp/isearch.el @@ -285,8 +285,13 @@ are `word-search-regexp' \(`\\[isearch-toggle-word]'), `isearch-symbol-regexp' "Controls the lazy-highlighting during incremental search. When non-nil, all text in the buffer matching the current search string is highlighted lazily (see `lazy-highlight-initial-delay' -and `lazy-highlight-interval')." - :type 'boolean +and `lazy-highlight-interval'). + +When multiple windows display the current buffer, the +highlighting is displayed only on the selected window, unless +this variable is set to the symbol `all-windows'." + :type '(choice boolean + (const :tag "On, and applied to all windows" all-windows)) :group 'lazy-highlight :group 'isearch) @@ -3298,8 +3303,9 @@ Attempt to do the search exactly the way the pending Isearch would." ;; 1000 is higher than ediff's 100+, ;; but lower than isearch main overlay's 1001 (overlay-put ov 'priority 1000) - (overlay-put ov 'face 'lazy-highlight))) - ;(overlay-put ov 'window (selected-window)))) + (overlay-put ov 'face 'lazy-highlight) + (unless (eq isearch-lazy-highlight 'all-windows) + (overlay-put ov 'window (selected-window))))) ;; Remember the current position of point for ;; the next call of `isearch-lazy-highlight-update' ;; when `lazy-highlight-max-at-a-time' is too small. -- cgit v1.2.1