diff options
author | dgp <dgp@users.sourceforge.net> | 2016-06-16 16:14:28 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2016-06-16 16:14:28 (GMT) |
commit | 95fb48bf07be37ad0717475514d2c444602a0a6c (patch) | |
tree | a51175b2fa396f61dbc6c3b7a8dc44f7aab2d761 | |
parent | 5cd52c2f5ee0d3caf3b915f3b5e5158fc11e5dd8 (diff) | |
download | tcl-95fb48bf07be37ad0717475514d2c444602a0a6c.zip tcl-95fb48bf07be37ad0717475514d2c444602a0a6c.tar.gz tcl-95fb48bf07be37ad0717475514d2c444602a0a6c.tar.bz2 |
Correct the patch.
-rw-r--r-- | generic/tclEvent.c | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/generic/tclEvent.c b/generic/tclEvent.c index 95fbf79..906ecbb 100644 --- a/generic/tclEvent.c +++ b/generic/tclEvent.c @@ -1457,11 +1457,8 @@ VwaitVarProc( int *donePtr = clientData; *donePtr = 1; - - Tcl_UntraceVar(interp, name1, - TCL_GLOBAL_ONLY|TCL_TRACE_WRITES|TCL_TRACE_UNSETS, + Tcl_UntraceVar(interp, name1, TCL_TRACE_WRITES|TCL_TRACE_UNSETS, VwaitVarProc, clientData); - return NULL; } |