From: Jason Rumney <jasonr@gnu.org>
Date: Fri, 3 May 2002 21:24:27 +0000 (+0000)
Subject: (Fmake_network_process): Only support server sockets
X-Git-Tag: ttn-vms-21-2-B4~15209
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=75728599a0bc6903eaa538c049d96a178ba85150;p=emacs.git

(Fmake_network_process): Only support server sockets
when we can make them non-blocking.
---

diff --git a/src/process.c b/src/process.c
index cdd9b61f7bc..d8f9c654c8a 100644
--- a/src/process.c
+++ b/src/process.c
@@ -2590,7 +2590,9 @@ usage: (make-network-process &rest ARGS)  */)
   tem = Fplist_get (contact, QCserver);
   if (!NILP (tem))
     {
-#ifdef TERM
+      /* Don't support network sockets when non-blocking mode is
+	 not available, since a blocked Emacs is not useful.  */
+#if defined(TERM) || (!defined(O_NONBLOCK) && !defined(O_NDELAY))
       error ("Network servers not supported");
 #else
       is_server = 1;