diff options
| author | Roland McGrath <[email protected]> | 1993-11-26 22:15:09 +0000 |
|---|---|---|
| committer | Roland McGrath <[email protected]> | 1993-11-26 22:15:09 +0000 |
| commit | 9bed762ea7fea222285b99d0139aa614ced92dfc (patch) | |
| tree | feceb6314a2161b379a65c0275a7f5dde6bc9e2a /lisp | |
| parent | 854f3a54d23485aff14faf2d7c9fc81e335d5d66 (diff) | |
(isearch-search): Use real quit-char extracted from current-input-mode,
rather than always C-g.
Diffstat (limited to 'lisp')
| -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 c7e84b7f9b..d437133508 100644 --- a/lisp/isearch.el +++ b/lisp/isearch.el @@ -4,7 +4,7 @@ ;; Author: Daniel LaLiberte <[email protected]> -;; |$Date: 1993/10/24 04:05:22 $|$Revision: 1.52 $ +;; |$Date: 1993/11/24 01:22:40 $|$Revision: 1.53 $ ;; This file is part of GNU Emacs. @@ -1295,7 +1295,7 @@ If there is no completion possible, say so and continue searching." (setq isearch-other-end (if isearch-forward (match-beginning 0) (match-end 0))))) - (quit (isearch-unread ?\C-g) + (quit (isearch-unread (nth 3 (current-input-mode))) (setq isearch-success nil)) (invalid-regexp |