diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2009-12-03 19:01:36 +0000 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2009-12-03 19:01:36 +0000 |
commit | 84b318269ceb95adcd16f49f6a110be04fcaeffd (patch) | |
tree | da28f37e2b490afb11787e1d6a026786a50827a8 /src/process.c | |
parent | f00c449ba1e11bda4b50d39b9ab60dfc9c889b05 (diff) | |
download | emacs-84b318269ceb95adcd16f49f6a110be04fcaeffd.tar.gz emacs-84b318269ceb95adcd16f49f6a110be04fcaeffd.tar.bz2 emacs-84b318269ceb95adcd16f49f6a110be04fcaeffd.zip |
(Fmake_network_process): Fix up the tests for
"connectionless socket", so they DTRT for seqpacket sockets as well.
Diffstat (limited to 'src/process.c')
-rw-r--r-- | src/process.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/process.c b/src/process.c index 61cf86e4eb3..088997d80ac 100644 --- a/src/process.c +++ b/src/process.c @@ -3333,7 +3333,7 @@ usage: (make-network-process &rest ARGS) */) QCaddress = is_server ? QClocal : QCremote; /* :nowait BOOL */ - if (!is_server && socktype == SOCK_STREAM + if (!is_server && socktype != SOCK_DGRAM && (tem = Fplist_get (contact, QCnowait), !NILP (tem))) { #ifndef NON_BLOCKING_CONNECT @@ -3428,7 +3428,7 @@ usage: (make-network-process &rest ARGS) */) Some kernels have a bug which causes retrying connect to fail after a connect. Polling can interfere with gethostbyname too. */ #ifdef POLL_FOR_INPUT - if (socktype == SOCK_STREAM) + if (socktype != SOCK_DGRAM) { record_unwind_protect (unwind_stop_other_atimers, Qnil); bind_polling_period (10); @@ -3631,7 +3631,7 @@ usage: (make-network-process &rest ARGS) */) } #endif - if (socktype == SOCK_STREAM && listen (s, backlog)) + if (socktype != SOCK_DGRAM && listen (s, backlog)) report_file_error ("Cannot listen on server socket", Qnil); break; @@ -3794,7 +3794,7 @@ usage: (make-network-process &rest ARGS) */) p->pid = 0; p->infd = inch; p->outfd = outch; - if (is_server && socktype == SOCK_STREAM) + if (is_server && socktype != SOCK_DGRAM) p->status = Qlisten; /* Make the process marker point into the process buffer (if any). */ |