changeset 23369:e2d1e6562433

(rlogin-send-Ctrl-C): Use process-send-string, not send-string. (rlogin-send-Ctrl-D): Here also. (rlogin-send-Ctrl-Z): Here also. (rlogin-send-Ctrl-backslash): Here also.
author Noah Friedman <friedman@splode.com>
date Sat, 03 Oct 1998 00:44:26 +0000
parents 7ded3a5044ab
children 7addb1da4b2b
files lisp/rlogin.el
diffstat 1 files changed, 5 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/rlogin.el	Fri Oct 02 18:11:14 1998 +0000
+++ b/lisp/rlogin.el	Sat Oct 03 00:44:26 1998 +0000
@@ -6,7 +6,7 @@
 ;; Maintainer: Noah Friedman <friedman@splode.com>
 ;; Keywords: unix, comm
 
-;; $Id: rlogin.el,v 1.42 1998/06/24 09:23:00 schwab Exp $
+;; $Id: rlogin.el,v 1.43 1998/09/11 01:22:53 friedman Exp $
 
 ;; This file is part of GNU Emacs.
 
@@ -339,19 +339,19 @@
 
 (defun rlogin-send-Ctrl-C ()
   (interactive)
-  (send-string nil "\C-c"))
+  (process-send-string nil "\C-c"))
 
 (defun rlogin-send-Ctrl-D ()
   (interactive)
-  (send-string nil "\C-d"))
+  (process-send-string nil "\C-d"))
 
 (defun rlogin-send-Ctrl-Z ()
   (interactive)
-  (send-string nil "\C-z"))
+  (process-send-string nil "\C-z"))
 
 (defun rlogin-send-Ctrl-backslash ()
   (interactive)
-  (send-string nil "\C-\\"))
+  (process-send-string nil "\C-\\"))
 
 (defun rlogin-delchar-or-send-Ctrl-D (arg)
   "\