diff options
| -rw-r--r-- | lisp/isearch.el | 4 |
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) |