aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorNoah Friedman1998-10-03 00:44:26 +0000
committerNoah Friedman1998-10-03 00:44:26 +0000
commitbbdbc4effb7707cc6eacc32fc624446b4cb615da (patch)
tree763c1a0f4fbcd21a38761f1e9bd339615271a613
parentf467e984868003c9ac400e86d99e76dae79acd54 (diff)
downloademacs-bbdbc4effb7707cc6eacc32fc624446b4cb615da.tar.gz
emacs-bbdbc4effb7707cc6eacc32fc624446b4cb615da.zip
(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.
-rw-r--r--lisp/rlogin.el10
1 files 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 @@
6;; Maintainer: Noah Friedman <friedman@splode.com> 6;; Maintainer: Noah Friedman <friedman@splode.com>
7;; Keywords: unix, comm 7;; Keywords: unix, comm
8 8
9;; $Id: rlogin.el,v 1.42 1998/06/24 09:23:00 schwab Exp $ 9;; $Id: rlogin.el,v 1.43 1998/09/11 01:22:53 friedman Exp $
10 10
11;; This file is part of GNU Emacs. 11;; This file is part of GNU Emacs.
12 12
@@ -339,19 +339,19 @@ local one share the same directories (through NFS)."
339 339
340(defun rlogin-send-Ctrl-C () 340(defun rlogin-send-Ctrl-C ()
341 (interactive) 341 (interactive)
342 (send-string nil "\C-c")) 342 (process-send-string nil "\C-c"))
343 343
344(defun rlogin-send-Ctrl-D () 344(defun rlogin-send-Ctrl-D ()
345 (interactive) 345 (interactive)
346 (send-string nil "\C-d")) 346 (process-send-string nil "\C-d"))
347 347
348(defun rlogin-send-Ctrl-Z () 348(defun rlogin-send-Ctrl-Z ()
349 (interactive) 349 (interactive)
350 (send-string nil "\C-z")) 350 (process-send-string nil "\C-z"))
351 351
352(defun rlogin-send-Ctrl-backslash () 352(defun rlogin-send-Ctrl-backslash ()
353 (interactive) 353 (interactive)
354 (send-string nil "\C-\\")) 354 (process-send-string nil "\C-\\"))
355 355
356(defun rlogin-delchar-or-send-Ctrl-D (arg) 356(defun rlogin-delchar-or-send-Ctrl-D (arg)
357 "\ 357 "\