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 | 3c2b67a4d35a1953c3b0d4f3a541f1e792ae5495 (patch) | |
tree | a51175b2fa396f61dbc6c3b7a8dc44f7aab2d761 /generic/tclEvent.c | |
parent | 08c3a9b76b6cfcff5857cf8f1ecd53aa1ee0360f (diff) | |
download | tcl-3c2b67a4d35a1953c3b0d4f3a541f1e792ae5495.zip tcl-3c2b67a4d35a1953c3b0d4f3a541f1e792ae5495.tar.gz tcl-3c2b67a4d35a1953c3b0d4f3a541f1e792ae5495.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; } |