mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-03 08:30:09 +00:00
Code Issues Releases 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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/ChangeLog
View File

@ -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

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