diff --git a/ChangeLog b/ChangeLog
index 959730b6df011af434010a8a115f566f3a210c2c_Q2hhbmdlTG9n..ba8448fb1eda8f33eb6bc15f6d847dfbb402efea_Q2hhbmdlTG9n 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+1998-07-14  SL Baur  <steve@altair.xemacs.org>
+
+	* rlogin.el: Global replace send-string -> process-send-string.
+	* ssh.el: Ditto.
+
 1998-06-07  Tomasz Cholewo  <tjchol01@aivo.spd.louisville.edu>
 
 	* jka-compr.el (jka-compr-partial-uncompress): Fix integer in concat.
diff --git a/Makefile b/Makefile
index 959730b6df011af434010a8a115f566f3a210c2c_TWFrZWZpbGU=..ba8448fb1eda8f33eb6bc15f6d847dfbb402efea_TWFrZWZpbGU= 100644
--- a/Makefile
+++ b/Makefile
@@ -19,7 +19,7 @@
 
 # This XEmacs package contains independent single file lisp packages
 
-VERSION = 1.08
+VERSION = 1.09
 AUTHOR_VERSION =
 MAINTAINER = XEmacs Development Team <xemacs-beta@xemacs.org>
 PACKAGE = os-utils
diff --git a/rlogin.el b/rlogin.el
index 959730b6df011af434010a8a115f566f3a210c2c_cmxvZ2luLmVs..ba8448fb1eda8f33eb6bc15f6d847dfbb402efea_cmxvZ2luLmVs 100644
--- a/rlogin.el
+++ b/rlogin.el
@@ -336,7 +336,7 @@
 
 (defun rlogin-send-Ctrl-C ()
   (interactive)
-  (send-string nil "\C-c"))
+  (process-send-string nil "\C-c"))
 
 (defun rlogin-send-Ctrl-D ()
   (interactive)
@@ -340,7 +340,7 @@
 
 (defun rlogin-send-Ctrl-D ()
   (interactive)
-  (send-string nil "\C-d"))
+  (process-send-string nil "\C-d"))
 
 (defun rlogin-send-Ctrl-Z ()
   (interactive)
@@ -344,7 +344,7 @@
 
 (defun rlogin-send-Ctrl-Z ()
   (interactive)
-  (send-string nil "\C-z"))
+  (process-send-string nil "\C-z"))
 
 (defun rlogin-send-Ctrl-backslash ()
   (interactive)
@@ -348,7 +348,7 @@
 
 (defun rlogin-send-Ctrl-backslash ()
   (interactive)
-  (send-string nil "\C-\\"))
+  (process-send-string nil "\C-\\"))
 
 (defun rlogin-delchar-or-send-Ctrl-D (arg)
   "\
diff --git a/ssh.el b/ssh.el
index 959730b6df011af434010a8a115f566f3a210c2c_c3NoLmVs..ba8448fb1eda8f33eb6bc15f6d847dfbb402efea_c3NoLmVs 100644
--- a/ssh.el
+++ b/ssh.el
@@ -326,7 +326,7 @@
 
 (defun ssh-send-Ctrl-C ()
   (interactive)
-  (send-string nil "\C-c"))
+  (process-send-string nil "\C-c"))
 
 (defun ssh-send-Ctrl-D ()
   (interactive)
@@ -330,7 +330,7 @@
 
 (defun ssh-send-Ctrl-D ()
   (interactive)
-  (send-string nil "\C-d"))
+  (process-send-string nil "\C-d"))
 
 (defun ssh-send-Ctrl-Z ()
   (interactive)
@@ -334,7 +334,7 @@
 
 (defun ssh-send-Ctrl-Z ()
   (interactive)
-  (send-string nil "\C-z"))
+  (process-send-string nil "\C-z"))
 
 (defun ssh-send-Ctrl-backslash ()
   (interactive)
@@ -338,7 +338,7 @@
 
 (defun ssh-send-Ctrl-backslash ()
   (interactive)
-  (send-string nil "\C-\\"))
+  (process-send-string nil "\C-\\"))
 
 (defun ssh-delchar-or-send-Ctrl-D (arg)
   "\