diff options
| author | dgp@users.sourceforge.net <dgp> | 2012-06-25 16:19:42 (GMT) |
|---|---|---|
| committer | dgp@users.sourceforge.net <dgp> | 2012-06-25 16:19:42 (GMT) |
| commit | c332bcd2aa81a4aac5d09b97a4adf7459ee14c53 (patch) | |
| tree | 0fbafe3fc1eae7bcb61f95ce2de6b5ec8100bfb6 /generic/tclIOUtil.c | |
| parent | 07d56c7fd5d11cfc4cf33913d8c76c578d040ae2 (diff) | |
| download | tcl-c332bcd2aa81a4aac5d09b97a4adf7459ee14c53.zip tcl-c332bcd2aa81a4aac5d09b97a4adf7459ee14c53.tar.gz tcl-c332bcd2aa81a4aac5d09b97a4adf7459ee14c53.tar.bz2 | |
Repair Claim/Disclaim imbalance
Diffstat (limited to 'generic/tclIOUtil.c')
| -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; } |