From deb66cb32d94e1bef373b79ec099021c11065566 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Fri, 6 May 2022 13:30:12 +0200 Subject: [PATCH] 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. --- lisp/help-mode.el | 3 ++- lisp/info.el | 3 ++- 2 files changed, 4 insertions(+), 2 deletions(-) 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. -- 2.39.5