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 /generic/tclEvent.c | |
| parent | 5cd52c2f5ee0d3caf3b915f3b5e5158fc11e5dd8 (diff) | |
| download | tcl-95fb48bf07be37ad0717475514d2c444602a0a6c.zip tcl-95fb48bf07be37ad0717475514d2c444602a0a6c.tar.gz tcl-95fb48bf07be37ad0717475514d2c444602a0a6c.tar.bz2 | |
Correct the patch.
Diffstat (limited to 'generic/tclEvent.c')
| -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; } |