# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 790458472 0
# Node ID 05e7543bbb9616d70a3e6ea4edd798e1dd4282d8
# Parent  6008e76f6ed26e16fc2b88f99523d78d97e0444c
(remote-compile): Use new global remote-shell-program.

diff -r 6008e76f6ed2 -r 05e7543bbb96 lisp/rcompile.el
--- a/lisp/rcompile.el	Wed Jan 18 19:47:32 1995 +0000
+++ b/lisp/rcompile.el	Wed Jan 18 19:47:52 1995 +0000
@@ -69,10 +69,6 @@
 
 ;;;; user defined variables
 
-(defvar remote-compile-rsh-command
-  (if (eq system-type 'usg-unix-v) "remsh" "rsh")
-  "*Name of remote shell command: `rsh' for BSD or `remsh' for SYSV.")
-
 (defvar remote-compile-host nil
   "*Host for remote compilations.")
 
@@ -146,7 +142,7 @@
                       (ange-ftp-ftp-name default-directory)))
          (compile-command
           (format "%s %s -l %s \"(%scd %s; %s)\""
-		  remote-compile-rsh-command
+		  remote-shell-program
                   host
                   remote-compile-user
                   (if remote-compile-run-before