diff options
| author | Karl Heuer | 1995-06-16 06:10:21 +0000 |
|---|---|---|
| committer | Karl Heuer | 1995-06-16 06:10:21 +0000 |
| commit | c79552226ebeb4e7c711e7d5b9d0c1c3fae6ac7d (patch) | |
| tree | b3f55162035213d6254b37a24ff612da9ffd9b3f | |
| parent | 217258d52e506f63673cace6f488d5da11646178 (diff) | |
| download | emacs-c79552226ebeb4e7c711e7d5b9d0c1c3fae6ac7d.tar.gz emacs-c79552226ebeb4e7c711e7d5b9d0c1c3fae6ac7d.zip | |
(isearch-mode): Use overriding-terminal-local-map, not overriding-local-map.
(isearch-done): Likewise.
| -rw-r--r-- | lisp/isearch.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/isearch.el b/lisp/isearch.el index c14a6d0ce49..015399cffb5 100644 --- a/lisp/isearch.el +++ b/lisp/isearch.el | |||
| @@ -500,8 +500,7 @@ is treated as a regexp. See \\[isearch-forward] for more info." | |||
| 500 | 500 | ||
| 501 | (isearch-push-state) | 501 | (isearch-push-state) |
| 502 | 502 | ||
| 503 | (make-local-variable 'overriding-local-map) | 503 | (setq overriding-terminal-local-map isearch-mode-map) |
| 504 | (setq overriding-local-map isearch-mode-map) | ||
| 505 | (isearch-update) | 504 | (isearch-update) |
| 506 | (run-hooks 'isearch-mode-hook) | 505 | (run-hooks 'isearch-mode-hook) |
| 507 | 506 | ||
| @@ -559,7 +558,7 @@ is treated as a regexp. See \\[isearch-forward] for more info." | |||
| 559 | (setq mouse-leave-buffer-hook nil) | 558 | (setq mouse-leave-buffer-hook nil) |
| 560 | ;; Called by all commands that terminate isearch-mode. | 559 | ;; Called by all commands that terminate isearch-mode. |
| 561 | ;; If NOPUSH is non-nil, we don't push the string on the search ring. | 560 | ;; If NOPUSH is non-nil, we don't push the string on the search ring. |
| 562 | (setq overriding-local-map nil) | 561 | (setq overriding-terminal-local-map nil) |
| 563 | ;; (setq pre-command-hook isearch-old-pre-command-hook) ; for lemacs | 562 | ;; (setq pre-command-hook isearch-old-pre-command-hook) ; for lemacs |
| 564 | (isearch-dehighlight t) | 563 | (isearch-dehighlight t) |
| 565 | (let ((found-start (window-start (selected-window))) | 564 | (let ((found-start (window-start (selected-window))) |