aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/isearch.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/isearch.el b/lisp/isearch.el
index 2b0783805fe..a98c2125ee0 100644
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -475,7 +475,7 @@ is treated as a regexp. See \\[isearch-forward] for more info."
475 (isearch-update) 475 (isearch-update)
476 (run-hooks 'isearch-mode-hook) 476 (run-hooks 'isearch-mode-hook)
477 477
478 (setq mouse-leave-buffer-hook '(isearch-done)) 478 (add-hook 'mouse-leave-buffer-hook 'isearch-done)
479 479
480 ;; isearch-mode can be made modal (in the sense of not returning to 480 ;; isearch-mode can be made modal (in the sense of not returning to
481 ;; the calling function until searching is completed) by entering 481 ;; the calling function until searching is completed) by entering
@@ -525,7 +525,7 @@ is treated as a regexp. See \\[isearch-forward] for more info."
525 ) 525 )
526 526
527(defun isearch-done (&optional nopush edit) 527(defun isearch-done (&optional nopush edit)
528 (setq mouse-leave-buffer-hook nil) 528 (remove-hook 'mouse-leave-buffer-hook 'isearch-done)
529 ;; Called by all commands that terminate isearch-mode. 529 ;; Called by all commands that terminate isearch-mode.
530 ;; If NOPUSH is non-nil, we don't push the string on the search ring. 530 ;; If NOPUSH is non-nil, we don't push the string on the search ring.
531 (setq overriding-terminal-local-map nil) 531 (setq overriding-terminal-local-map nil)