Mercurial > emacs

changeset 5793:85abf27f701f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(rlogin-delchar-or-send-Ctrl-D): Call rlogin-send-Ctrl-D. Doc fix.
author Roland McGrath <roland@gnu.org>
date Sat, 05 Feb 1994 21:13:43 +0000
parents 242985a124fc
children 9d324422db4c
files lisp/rlogin.el
diffstat 1 files changed, 4 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/rlogin.el	Sat Feb 05 21:00:13 1994 +0000
+++ b/lisp/rlogin.el	Sat Feb 05 21:13:43 1994 +0000
@@ -23,7 +23,7 @@
 ;;; Commentary:
 
 ;; Support for remote logins using `rlogin'.
-;; $Id: rlogin.el,v 1.15 1993/12/01 13:04:24 friedman Exp roland $
+;; $Id: rlogin.el,v 1.16 1994/02/05 21:00:13 roland Exp roland $
 
 ;;; Todo:
 
@@ -209,11 +209,11 @@
   (send-string nil "\C-\\"))
 
 (defun rlogin-delchar-or-send-Ctrl-D (arg)
-  "Delete ARG characters forward, or send a C-d to process if at end of
-buffer."  
+  "\
+Delete ARG characters forward, or send a C-d to process if at end of buffer."  
   (interactive "p") 
   (if (eobp)
-      (send-string nil "\C-d")
+      (rlogin-send-Ctrl-D)
     (delete-char arg)))
 
 ;;; rlogin.el ends here