Re: Simple isearch concerns

[Gregory Heytings <gregory@heytings.org>]

[-- Attachment #1: Type: text/plain, Size: 642 bytes --]


>>> And here is a micro-patch to fix that behavior.
>>> 
>>> +  ;; Terminate the search if point has moved to another buffer.
>>> +  (unless (eq isearch-buffer (current-buffer))
>>> +    (isearch-cancel))
>> 
>> Have you tested this with 'multi-isearch-buffers'?
>
> No, because I did not know that multi-isearch-buffers exists.  I see 
> that it uses multi-isearch-current-buffer in a similar way than 
> isearch-buffer, but currently I don't know anything else about 
> multi-isearch-buffers, so I cannot try to fix this.
>

Okay, I looked a bit closer at multi-isearch, and it seems that the 
attached patch works with mutli-isearch, too.

[-- Attachment #2: Type: text/x-diff, Size: 1053 bytes --]

From 2a000d2eee25ca0ccbb5f0c638c7c9bd0a653808 Mon Sep 17 00:00:00 2001
From: Gregory Heytings <gregory@heytings.org>
Date: Wed, 7 Apr 2021 10:16:24 +0000
Subject: [PATCH] Terminate isearch when point has moved to another buffer

* lisp/isearch.el (isearch-post-command-hook): Terminate isearch
when the command just executed has moved point to another buffer.
---
 lisp/isearch.el | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/lisp/isearch.el b/lisp/isearch.el
index a828c569aa..a93e7a9576 100644
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -3040,6 +3040,9 @@ See more for options in `search-exit-option'."
            (goto-char isearch-pre-move-point))
          (isearch-search-and-update)))
      (setq isearch-pre-move-point nil))
+  ;; Terminate the search if point has moved to another buffer.
+  (unless (eq isearch--current-buffer (current-buffer))
+    (with-current-buffer isearch--current-buffer (isearch-exit)))
   (force-mode-line-update))
 
 (defun isearch-quote-char (&optional count)
-- 
2.30.2