summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ChangeLog4
-rw-r--r--unix/tclUnixChan.c4
2 files changed, 6 insertions, 2 deletions
diff --git a/ChangeLog b/ChangeLog
index 2e95753..da33ecb 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2007-07-31 Donal K. Fellows <donal.k.fellows@manchester.ac.uk>
+
+ * unix/tclUnixChan.c (FileWatchProc): Fix test failures.
+
2007-07-30 Donal K. Fellows <donal.k.fellows@manchester.ac.uk>
* unix/tclUnixChan.c (SET_BITS, CLEAR_BITS): Added macros to make this
diff --git a/unix/tclUnixChan.c b/unix/tclUnixChan.c
index ab440de..734b78d 100644
--- a/unix/tclUnixChan.c
+++ b/unix/tclUnixChan.c
@@ -10,7 +10,7 @@
* See the file "license.terms" for information on usage and redistribution of
* this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclUnixChan.c,v 1.79 2007/07/30 13:42:24 dkf Exp $
+ * RCS: @(#) $Id: tclUnixChan.c,v 1.80 2007/07/31 08:19:31 dkf Exp $
*/
#include "tclInt.h" /* Internal definitions for Tcl. */
@@ -693,7 +693,7 @@ FileWatchProc(
* with the channel pointer as the client data.
*/
- CLEAR_BITS(mask, fsPtr->validMask);
+ mask &= fsPtr->validMask;
if (mask) {
Tcl_CreateFileHandler(fsPtr->fd, mask,
(Tcl_FileProc *) Tcl_NotifyChannel,