From: Jan D <jan.h.d@swipnet.se>
Date: Mon, 27 Sep 2010 20:43:03 +0000 (+0200)
Subject: * process.c (wait_reading_process_output): Add missing FD_CLR
X-Git-Tag: emacs-pretest-24.0.90~104^2~275^2~438^2~47^2~30
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d8a4b27a847945fb629067132d7287cc075083dd;p=emacs.git

* process.c (wait_reading_process_output): Add missing FD_CLR
for write_mask (must mirror connect_wait_mask).
---

diff --git a/src/ChangeLog b/src/ChangeLog
index 18f71f31dde..fac06961ef9 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2010-09-27  Jan Djärv  <jan.h.d@swipnet.se>
+
+	* process.c (wait_reading_process_output): Add missing FD_CLR
+	for write_mask (must mirror connect_wait_mask).
+
 2010-09-27  Teodor Zlatanov  <tzz@lifelogs.com>
 
 	* gnutls.c (gnutls_log_function): Show level and "gnutls.c"
diff --git a/src/process.c b/src/process.c
index cf16027b30a..4536dcc2a8e 100644
--- a/src/process.c
+++ b/src/process.c
@@ -5068,6 +5068,7 @@ wait_reading_process_output (int time_limit, int microsecs, int read_kbd,
 	      struct Lisp_Process *p;
 
 	      FD_CLR (channel, &connect_wait_mask);
+              FD_CLR (channel, &write_mask);
 	      if (--num_pending_connects < 0)
 		abort ();