changeset 17472:c7a720ef31e6

(rlogin-process-connection-type): Default to t for solaris 2.x.
author Noah Friedman <friedman@splode.com>
date Tue, 15 Apr 1997 10:39:07 +0000
parents f383bfae3202
children 83503d0dc576
files lisp/rlogin.el
diffstat 1 files changed, 10 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- 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).