diff options
| -rw-r--r-- | lisp/isearch.el | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/lisp/isearch.el b/lisp/isearch.el index 0a3b0e26bdb..22d5cc82bd2 100644 --- a/lisp/isearch.el +++ b/lisp/isearch.el | |||
| @@ -1,6 +1,7 @@ | |||
| 1 | ;;; isearch.el --- incremental search minor mode. | 1 | ;;; isearch.el --- incremental search minor mode. |
| 2 | 2 | ||
| 3 | ;; Copyright (C) 1992, 93, 94, 95, 96, 97, 1999 Free Software Foundation, Inc. | 3 | ;; Copyright (C) 1992, 93, 94, 95, 96, 97, 1999, 2000 |
| 4 | ;; Free Software Foundation, Inc. | ||
| 4 | 5 | ||
| 5 | ;; Author: Daniel LaLiberte <liberte@cs.uiuc.edu> | 6 | ;; Author: Daniel LaLiberte <liberte@cs.uiuc.edu> |
| 6 | ;; Maintainer: FSF | 7 | ;; Maintainer: FSF |
| @@ -266,6 +267,11 @@ Default value, nil, means edit the string instead." | |||
| 266 | ;; Several non-printing chars change the searching behavior. | 267 | ;; Several non-printing chars change the searching behavior. |
| 267 | (define-key map "\C-s" 'isearch-repeat-forward) | 268 | (define-key map "\C-s" 'isearch-repeat-forward) |
| 268 | (define-key map "\C-r" 'isearch-repeat-backward) | 269 | (define-key map "\C-r" 'isearch-repeat-backward) |
| 270 | ;; Define M-C-s and M-C-r like C-s and C-r so that the same key | ||
| 271 | ;; combinations can be used to repeat regexp isearches that can | ||
| 272 | ;; be used to start these searches. | ||
| 273 | (define-key map "\M-\C-s" 'isearch-repeat-forward) | ||
| 274 | (define-key map "\M-\C-r" 'isearch-repeat-backward) | ||
| 269 | (define-key map "\177" 'isearch-delete-char) | 275 | (define-key map "\177" 'isearch-delete-char) |
| 270 | (define-key map "\C-g" 'isearch-abort) | 276 | (define-key map "\C-g" 'isearch-abort) |
| 271 | ;; This assumes \e is the meta-prefix-char. | 277 | ;; This assumes \e is the meta-prefix-char. |