diff options
| author | dgp <dgp@users.sourceforge.net> | 2012-06-20 19:49:31 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2012-06-20 19:49:31 (GMT) |
| commit | f9037344f87d9722ef8152dd4c5b404cdd7ba983 (patch) | |
| tree | 856404b798f52f31461f6b5895d0b117284ae42a /generic/tclIOUtil.c | |
| parent | 57d68d7c1623442deab713279fdfeb6daf13eff9 (diff) | |
| parent | 38f0b4d80988173806607621adbf9258d555f033 (diff) | |
| download | tcl-f9037344f87d9722ef8152dd4c5b404cdd7ba983.zip tcl-f9037344f87d9722ef8152dd4c5b404cdd7ba983.tar.gz tcl-f9037344f87d9722ef8152dd4c5b404cdd7ba983.tar.bz2 | |
Purge more dead fs path code.
Diffstat (limited to 'generic/tclIOUtil.c')
| -rw-r--r-- | generic/tclIOUtil.c | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/generic/tclIOUtil.c b/generic/tclIOUtil.c index e4b4ad6..e3c5816 100644 --- a/generic/tclIOUtil.c +++ b/generic/tclIOUtil.c @@ -2662,7 +2662,7 @@ Tcl_FSGetCwd( retVal = (*fsRecPtr->fsPtr->internalToNormalizedProc)( retCd); Tcl_IncrRefCount(retVal); - norm = TclFSNormalizeAbsolutePath(interp,retVal,NULL); + norm = TclFSNormalizeAbsolutePath(interp,retVal); if (norm != NULL) { /* * We found a cwd, which is now in our global @@ -2708,7 +2708,7 @@ Tcl_FSGetCwd( */ if (retVal != NULL) { - Tcl_Obj *norm = TclFSNormalizeAbsolutePath(interp, retVal, NULL); + Tcl_Obj *norm = TclFSNormalizeAbsolutePath(interp, retVal); if (norm != NULL) { /* * We found a cwd, which is now in our global storage. We must @@ -2776,8 +2776,7 @@ Tcl_FSGetCwd( retVal = (*proc)(interp); } if (retVal != NULL) { - Tcl_Obj *norm = TclFSNormalizeAbsolutePath(interp, - retVal, NULL); + Tcl_Obj *norm = TclFSNormalizeAbsolutePath(interp, retVal); /* * Check whether cwd has changed from the value previously |