diff options
| author | Richard M. Stallman <rms@gnu.org> | 1993-03-09 21:18:31 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1993-03-09 21:18:31 +0000 |
| commit | bc6312e108ae6fa8962f837103e8b4ae318543c1 (patch) | |
| tree | a41be7086ee8f4f1cefe7c5127d33e6f56b1be3b /lisp/replace.el | |
| parent | 81eb8fcd8dc8ac7692ec125014f4ec2fe14d5f25 (diff) | |
| download | emacs-bc6312e108ae6fa8962f837103e8b4ae318543c1.tar.gz | |
(query-replace-map): Add `quit' bindings. Delete default binding.
Diffstat (limited to 'lisp/replace.el')
| -rw-r--r-- | lisp/replace.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/replace.el b/lisp/replace.el index 3c1789eb254..3f730ec3f2f 100644 --- a/lisp/replace.el +++ b/lisp/replace.el @@ -384,9 +384,8 @@ The valid answers include `act', `skip', `act-and-show', (define-key query-replace-map "^" 'backup) (define-key query-replace-map "\C-h" 'help) (define-key query-replace-map "?" 'help) -;; Cause all other types of events to be unread immediately, -;; without regard to the global map. -(define-key query-replace-map [t] 'ignore) +(define-key query-replace-map "\C-g" 'quit) +(define-key query-replace-map "\C-]" 'quit) (defun perform-replace (from-string replacements query-flag regexp-flag delimited-flag |