From 1ea1fb7e14fe150681298a9d4ec85c4bb80d0b0e Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Tue, 4 Apr 2000 21:04:34 +0000 Subject: [PATCH] (isearch-mode-map): Define M-C-s like C-s and M-C-r like C-r. --- lisp/isearch.el | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) 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 @@ ;;; isearch.el --- incremental search minor mode. -;; Copyright (C) 1992, 93, 94, 95, 96, 97, 1999 Free Software Foundation, Inc. +;; Copyright (C) 1992, 93, 94, 95, 96, 97, 1999, 2000 +;; Free Software Foundation, Inc. ;; Author: Daniel LaLiberte ;; Maintainer: FSF @@ -266,6 +267,11 @@ Default value, nil, means edit the string instead." ;; Several non-printing chars change the searching behavior. (define-key map "\C-s" 'isearch-repeat-forward) (define-key map "\C-r" 'isearch-repeat-backward) + ;; Define M-C-s and M-C-r like C-s and C-r so that the same key + ;; combinations can be used to repeat regexp isearches that can + ;; be used to start these searches. + (define-key map "\M-\C-s" 'isearch-repeat-forward) + (define-key map "\M-\C-r" 'isearch-repeat-backward) (define-key map "\177" 'isearch-delete-char) (define-key map "\C-g" 'isearch-abort) ;; This assumes \e is the meta-prefix-char. -- 2.39.5