summaryrefslogtreecommitdiff
path: root/lisp/rlogin.el
diff options
context:
space:
mode:
authorNoah Friedman <friedman@splode.com>1997-04-15 10:39:07 +0000
committerNoah Friedman <friedman@splode.com>1997-04-15 10:39:07 +0000
commit72ee5c9c6f85faaebf1034207a8a31d6c6e3516a (patch)
tree98aad48affb87f81fa4d490fdd2d4eb3a3c7ba85 /lisp/rlogin.el
parent878086c9558affadc2e326422ddf266c4a11be2e (diff)
downloademacs-72ee5c9c6f85faaebf1034207a8a31d6c6e3516a.tar.gz
(rlogin-process-connection-type): Default to t for solaris 2.x.
Diffstat (limited to 'lisp/rlogin.el')
-rw-r--r--lisp/rlogin.el12
1 files changed, 10 insertions, 2 deletions
diff --git a/lisp/rlogin.el b/lisp/rlogin.el
index fd27a93638a..bfe9eb63763 100644
--- a/lisp/rlogin.el
+++ b/lisp/rlogin.el
@@ -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).