emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master e3824f0a31: * lisp/isearch.el (isearch-search): Don't bind `inhib


From: Stefan Monnier
Subject: master e3824f0a31: * lisp/isearch.el (isearch-search): Don't bind `inhibit-point-motion-hooks`
Date: Fri, 7 Oct 2022 14:07:26 -0400 (EDT)

branch: master
commit e3824f0a3189d0902d64a70ae9c82ff1240aed5f
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>

    * lisp/isearch.el (isearch-search): Don't bind `inhibit-point-motion-hooks`
    
    The let-binding was added back in 1997 (commit 79c7a4fa5f974a9d3b)
    "because we might have to search inside invisible and intangible text".
    So it's been redundant since Emacs-25 changed the default to t.
---
 lisp/isearch.el | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/lisp/isearch.el b/lisp/isearch.el
index 3e840b014f..bc3697deb0 100644
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -3649,8 +3649,7 @@ Optional third argument, if t, means if fail just return 
nil (no error).
       (setq isearch-case-fold-search
            (isearch-no-upper-case-p isearch-string isearch-regexp)))
   (condition-case lossage
-      (let ((inhibit-point-motion-hooks isearch-invisible)
-           (inhibit-quit nil)
+      (let ((inhibit-quit nil)
            (case-fold-search isearch-case-fold-search)
            (search-invisible isearch-invisible)
            (retry t))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]