summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--generic/tclEvent.c5
1 files changed, 5 insertions, 0 deletions
diff --git a/generic/tclEvent.c b/generic/tclEvent.c
index ba2bb64..4de8f0b 100644
--- a/generic/tclEvent.c
+++ b/generic/tclEvent.c
@@ -1451,6 +1451,11 @@ VwaitVarProc(
int *donePtr = clientData;
*donePtr = 1;
+
+ Tcl_UntraceVar(interp, name1,
+ TCL_GLOBAL_ONLY|TCL_TRACE_WRITES|TCL_TRACE_UNSETS,
+ VwaitVarProc, clientData);
+
return NULL;
}