From bbdbc4effb7707cc6eacc32fc624446b4cb615da Mon Sep 17 00:00:00 2001 From: Noah Friedman Date: Sat, 3 Oct 1998 00:44:26 +0000 Subject: [PATCH] (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. --- lisp/rlogin.el | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) 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 ;; 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) "\ -- 2.39.2