diff options
| author | lecoanet | 2006-08-22 14:12:11 +0000 |
|---|---|---|
| committer | lecoanet | 2006-08-22 14:12:11 +0000 |
| commit | 8f3027c2d68fb19be642bb41315391056d90bd1d (patch) | |
| tree | 8e50145ea02ea3e06726228ea8e73c2d4e942c97 /generic/tkZinc.c | |
| parent | 382de09f322ff0d7821e5d396119b3dd4ec73dbc (diff) | |
| download | tkzinc-8f3027c2d68fb19be642bb41315391056d90bd1d.zip tkzinc-8f3027c2d68fb19be642bb41315391056d90bd1d.tar.gz tkzinc-8f3027c2d68fb19be642bb41315391056d90bd1d.tar.bz2 tkzinc-8f3027c2d68fb19be642bb41315391056d90bd1d.tar.xz | |
Fix bug #60. Forgot enclosed and closest.
Diffstat (limited to 'generic/tkZinc.c')
| -rw-r--r-- | generic/tkZinc.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/generic/tkZinc.c b/generic/tkZinc.c index 0361549..9a49cb6 100644 --- a/generic/tkZinc.c +++ b/generic/tkZinc.c @@ -3218,6 +3218,7 @@ FindItems(ZnWInfo *wi, if (argc > first+5) { result = Tcl_GetBooleanFromObj(wi->interp, args[first+5], &ps.recursive); if (result != TCL_OK) { + Tcl_ResetResult(wi->interp); str = Tcl_GetString(args[first+5]); if (strcmp(str, "override") != 0) { Tcl_AppendResult(wi->interp, @@ -3267,6 +3268,7 @@ FindItems(ZnWInfo *wi, if (argc > first+6) { result = Tcl_GetBooleanFromObj(wi->interp, args[first+6], &ps.recursive); if (result != TCL_OK) { + Tcl_ResetResult(wi->interp); str = Tcl_GetString(args[first+6]); if (strcmp(str, "override") != 0) { Tcl_AppendResult(wi->interp, |