# HG changeset patch # User Richard M. Stallman # Date 896318181 0 # Node ID 91aa269656e4c325901f688e96864f17f4f37789 # Parent 71f954d59214b7e1ede657d11fe401fc09593877 (comint-mode-map): Move bindings of comint-next-matching-input-from-input to C-c M-r, and comint-previous-matching-input-from-input to C-c M-s. Move comint-get-next-from-history to C-c C-x. diff -r 71f954d59214 -r 91aa269656e4 lisp/comint.el --- a/lisp/comint.el Thu May 28 01:15:58 1998 +0000 +++ b/lisp/comint.el Thu May 28 01:16:21 1998 +0000 @@ -490,13 +490,13 @@ (define-key comint-mode-map [C-down] 'comint-next-input) (define-key comint-mode-map "\er" 'comint-previous-matching-input) (define-key comint-mode-map "\es" 'comint-next-matching-input) - (define-key comint-mode-map [?\A-\M-r] 'comint-previous-matching-input-from-input) - (define-key comint-mode-map [?\A-\M-s] 'comint-next-matching-input-from-input) + (define-key comint-mode-map [?\C-c ?\M-r] 'comint-previous-matching-input-from-input) + (define-key comint-mode-map [?\C-c ?\M-s] 'comint-next-matching-input-from-input) (define-key comint-mode-map "\e\C-l" 'comint-show-output) (define-key comint-mode-map "\C-m" 'comint-send-input) (define-key comint-mode-map "\C-d" 'comint-delchar-or-maybe-eof) (define-key comint-mode-map "\C-c " 'comint-accumulate) - (define-key comint-mode-map "\C-c\C-q" 'comint-get-next-from-history) + (define-key comint-mode-map "\C-c\C-x" 'comint-get-next-from-history) (define-key comint-mode-map "\C-c\C-a" 'comint-bol-or-process-mark) (define-key comint-mode-map "\C-c\C-u" 'comint-kill-input) (define-key comint-mode-map "\C-c\C-w" 'backward-kill-word)