From d9d1dfefe13b0f0a5f5402ab57bf8d22cd040486 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Fri, 11 May 2012 08:40:43 -0400 Subject: [PATCH] * net/rlogin.el (rlogin-mode-map): Fix last change. --- lisp/ChangeLog | 4 ++++ lisp/net/rlogin.el | 12 ++++++------ 2 files changed, 10 insertions(+), 6 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 8e6a3c0f106..e6183d92705 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2012-05-11 Stefan Monnier + + * net/rlogin.el (rlogin-mode-map): Fix last change. + 2012-05-09 Jason L. Wright (tiny change) * mail/smtpmail.el (smtpmail-send-command): Send the command and diff --git a/lisp/net/rlogin.el b/lisp/net/rlogin.el index ac936ee1429..cef615dc320 100644 --- a/lisp/net/rlogin.el +++ b/lisp/net/rlogin.el @@ -114,12 +114,12 @@ this variable is set from that." (let ((map (if (consp shell-mode-map) (cons 'keymap shell-mode-map) (copy-keymap shell-mode-map)))) - (define-key rlogin-mode-map "\C-c\C-c" 'rlogin-send-Ctrl-C) - (define-key rlogin-mode-map "\C-c\C-d" 'rlogin-send-Ctrl-D) - (define-key rlogin-mode-map "\C-c\C-z" 'rlogin-send-Ctrl-Z) - (define-key rlogin-mode-map "\C-c\C-\\" 'rlogin-send-Ctrl-backslash) - (define-key rlogin-mode-map "\C-d" 'rlogin-delchar-or-send-Ctrl-D) - (define-key rlogin-mode-map "\C-i" 'rlogin-tab-or-complete) + (define-key map "\C-c\C-c" 'rlogin-send-Ctrl-C) + (define-key map "\C-c\C-d" 'rlogin-send-Ctrl-D) + (define-key map "\C-c\C-z" 'rlogin-send-Ctrl-Z) + (define-key map "\C-c\C-\\" 'rlogin-send-Ctrl-backslash) + (define-key map "\C-d" 'rlogin-delchar-or-send-Ctrl-D) + (define-key map "\C-i" 'rlogin-tab-or-complete) map) "Keymap for `rlogin-mode'.") -- 2.39.2