diff options
| author | dgp <dgp@users.sourceforge.net> | 2012-06-25 16:19:42 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2012-06-25 16:19:42 (GMT) |
| commit | 5b2718a49ed67a4ac9378b222b1cab87cf55856b (patch) | |
| tree | 0fbafe3fc1eae7bcb61f95ce2de6b5ec8100bfb6 | |
| parent | b0f256541bc7a9e4221bcf6500e83e8cf5c250d6 (diff) | |
| download | tcl-5b2718a49ed67a4ac9378b222b1cab87cf55856b.zip tcl-5b2718a49ed67a4ac9378b222b1cab87cf55856b.tar.gz tcl-5b2718a49ed67a4ac9378b222b1cab87cf55856b.tar.bz2 | |
Repair Claim/Disclaim imbalance
| -rw-r--r-- | generic/tclIOUtil.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/generic/tclIOUtil.c b/generic/tclIOUtil.c index dccbeb5..b1b8961 100644 --- a/generic/tclIOUtil.c +++ b/generic/tclIOUtil.c @@ -4390,6 +4390,7 @@ Tcl_FSGetFileSystemForPath( Claim(); if (TclFSEnsureEpochOk(pathPtr, &retVal) != TCL_OK) { + Disclaim(); return NULL; } |