Mercurial > emacs
changeset 5195:9c64f67c4683
(isearch-search): Use real quit-char extracted from current-input-mode,
rather than always C-g.
author | Roland McGrath <roland@gnu.org> |
---|---|
date | Fri, 26 Nov 1993 22:15:09 +0000 |
parents | 85a1088ca765 |
children | 87d3df5d0e4e |
files | lisp/isearch.el |
diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/isearch.el Fri Nov 26 21:54:39 1993 +0000 +++ b/lisp/isearch.el Fri Nov 26 22:15:09 1993 +0000 @@ -4,7 +4,7 @@ ;; Author: Daniel LaLiberte <liberte@cs.uiuc.edu> -;; |$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 @@ (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