From: Noah Friedman <friedman@splode.com>
Date: Sat, 3 Oct 1998 00:44:26 +0000 (+0000)
Subject: (rlogin-send-Ctrl-C): Use process-send-string, not send-string.
X-Git-Tag: emacs-20.4~1580
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=bbdbc4effb7707cc6eacc32fc624446b4cb615da;p=emacs.git

(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.
---

diff --git a/lisp/rlogin.el b/lisp/rlogin.el
index 6d940986801..09e3b13066c 100644
--- a/lisp/rlogin.el
+++ b/lisp/rlogin.el
@@ -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 @@ local one share the same directories (through NFS)."
 
 (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)
   "\