mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

* net/rlogin.el (rlogin-mode-map): Fix last change.

Browse source
This commit is contained in:
Stefan Monnier 2012-05-11 08:40:43 -04:00
parent 297834cdf3
commit d9d1dfefe1
2 changed files with 10 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

12
lisp/net/rlogin.el
View file

@ -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'.")