From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Fri, 6 May 2022 11:30:12 +0000 (+0200)
Subject: Don't override search-default-mode set by user in info/help
X-Git-Tag: emacs-29.0.90~1931^2~23
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=deb66cb32d94e1bef373b79ec099021c11065566;p=emacs.git

Don't override search-default-mode set by user in info/help

* lisp/info.el (Info-mode):
* lisp/help-mode.el (help-mode): Don't override isearch mode set
by the user.
---

diff --git a/lisp/help-mode.el b/lisp/help-mode.el
index 38a2f93a3c3..a0a587cd810 100644
--- a/lisp/help-mode.el
+++ b/lisp/help-mode.el
@@ -416,7 +416,8 @@ Commands:
   (setq-local help-mode--current-data nil)
   (setq-local bookmark-make-record-function
               #'help-bookmark-make-record)
-  (isearch-fold-quotes-mode))
+  (unless search-default-mode
+    (isearch-fold-quotes-mode)))
 
 ;;;###autoload
 (defun help-mode-setup ()
diff --git a/lisp/info.el b/lisp/info.el
index 0bdb2f2e7a3..514cf7b3f47 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -4491,7 +4491,8 @@ Advanced commands:
   (setq-local font-lock-defaults '(Info-mode-font-lock-keywords t t))
   (Info-set-mode-line)
   (setq-local bookmark-make-record-function #'Info-bookmark-make-record)
-  (isearch-fold-quotes-mode))
+  (unless search-default-mode
+    (isearch-fold-quotes-mode)))
 
 ;; When an Info buffer is killed, make sure the associated tags buffer
 ;; is killed too.