diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2012-05-11 08:40:43 -0400 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2012-05-11 08:40:43 -0400 |
commit | d9d1dfefe13b0f0a5f5402ab57bf8d22cd040486 (patch) | |
tree | b57d89de47cd25fc45d59728ae833123921abab0 | |
parent | 297834cdf39433f7bf8e63d6c784a3a2a9889b08 (diff) | |
download | emacs-d9d1dfefe13b0f0a5f5402ab57bf8d22cd040486.tar.gz |
* net/rlogin.el (rlogin-mode-map): Fix last change.
-rw-r--r-- | lisp/ChangeLog | 4 | ||||
-rw-r--r-- | 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 <monnier@iro.umontreal.ca> + + * net/rlogin.el (rlogin-mode-map): Fix last change. + 2012-05-09 Jason L. Wright <jason.wright@inl.gov> (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'.") |