From: Augusto Stoffel <arstoffel@gmail.com>
Date: Sat, 14 May 2022 15:21:27 +0000 (+0200)
Subject: Make minibuffer lazy highlight setup buffer-local where appropriate
X-Git-Tag: emacs-29.0.90~1910^2~662
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2b3f3d421aac829f8cdefed1d2fc3f6116066a0d;p=emacs.git

Make minibuffer lazy highlight setup buffer-local where appropriate

* lisp/isearch.el (minibuffer-lazy-highlight-setup): Modify hooks
buffer-locally, so that recursive minibuffers are not affected by the
special behavior of lazy-highlight.  Also make
'isearch-filter-predicate' buffer-local, so that isearch in the
minibuffer is not affected by the region filter (bug#55110).
---

diff --git a/lisp/isearch.el b/lisp/isearch.el
index 96168f94bd5..3e1dab4d15d 100644
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -4441,12 +4441,13 @@ LAX-WHITESPACE: The value of `isearch-lax-whitespace' and
                                 (format minibuffer-lazy-count-format
                                         isearch-lazy-count-total)))))
       (lambda ()
-        (add-hook 'minibuffer-exit-hook unwind)
-        (add-hook 'after-change-functions after-change)
+        (add-hook 'minibuffer-exit-hook unwind nil t)
+        (add-hook 'after-change-functions after-change nil t)
         (when minibuffer-lazy-count-format
           (setq overlay (make-overlay (point-min) (point-min) (current-buffer) t))
           (add-hook 'lazy-count-update-hook display-count))
         (when filter
+          (make-local-variable 'isearch-filter-predicate)
           (add-function :after-while isearch-filter-predicate filter))
         (funcall after-change nil nil nil)))))