summaryrefslogtreecommitdiffstats
path: root/generic/tclIORChan.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2015-09-25 16:32:55 (GMT)
committerdgp <dgp@users.sourceforge.net>2015-09-25 16:32:55 (GMT)
commit302c01c61f17808f9a5fa78396a990cc3349f5c9 (patch)
treee4f8b6d013dec42e32cbb232ea29936bc77473a1 /generic/tclIORChan.c
parentcff33879237727611c8beb8ecde9f08bbf2690c3 (diff)
downloadtcl-bug_05489ce335.zip
tcl-bug_05489ce335.tar.gz
tcl-bug_05489ce335.tar.bz2
Backout failed attempt to fix [32ae34e63a].bug_05489ce335
Diffstat (limited to 'generic/tclIORChan.c')
-rw-r--r--generic/tclIORChan.c8
1 files changed, 8 insertions, 0 deletions
diff --git a/generic/tclIORChan.c b/generic/tclIORChan.c
index 2e5fa45..bbb5b88 100644
--- a/generic/tclIORChan.c
+++ b/generic/tclIORChan.c
@@ -1508,6 +1508,14 @@ ReflectWatch(
mask &= rcPtr->mode;
+ if (mask == rcPtr->interest) {
+ /*
+ * Same old, same old, why should we do something?
+ */
+
+ return;
+ }
+
rcPtr->interest = mask;
/*