# HG changeset patch
# User Noah Friedman <friedman@splode.com>
# Date 861100747 0
# Node ID c7a720ef31e60cdb6e63c5902179e021c74ca090
# Parent  f383bfae320250c7875069a4cef52aa8f62ecc11
(rlogin-process-connection-type): Default to t for solaris 2.x.

diff -r f383bfae3202 -r c7a720ef31e6 lisp/rlogin.el
--- a/lisp/rlogin.el	Tue Apr 15 07:48:25 1997 +0000
+++ b/lisp/rlogin.el	Tue Apr 15 10:39:07 1997 +0000
@@ -23,7 +23,7 @@
 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
 ;; Boston, MA 02111-1307, USA.
 
-;; $Id: rlogin.el,v 1.36 1997/04/12 02:53:36 rms Exp rms $
+;; $Id: rlogin.el,v 1.37 1997/04/12 02:55:04 rms Exp $
 
 ;;; Commentary:
 
@@ -63,7 +63,15 @@
   :type 'hook
   :group 'rlogin)
 
-(defcustom rlogin-process-connection-type nil
+(defcustom rlogin-process-connection-type
+  (save-match-data
+    ;; Solaris 2.x `rlogin' will spew a bunch of ioctl error messages if
+    ;; stdin isn't a tty.
+    (cond ((and (boundp 'system-configuration)
+                (stringp system-configuration)
+                (string-match "-solaris2" system-configuration))
+           t)
+          (t nil)))
   "*If non-`nil', use a pty for the local rlogin process.
 If `nil', use a pipe (if pipes are supported on the local system).