diff options
| author | dgp <dgp@users.sourceforge.net> | 2017-05-01 20:29:02 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2017-05-01 20:29:02 (GMT) |
| commit | 4c0461c1f6d27e2f71bd6aadcf2be1ecd4a4842a (patch) | |
| tree | 93dd89ea72c362534314356f2b1f7d7fb428e1b9 /generic/tclPathObj.c | |
| parent | cebc6d8e934fb4416742c51d2a59bccd95e66c17 (diff) | |
| download | tcl-4c0461c1f6d27e2f71bd6aadcf2be1ecd4a4842a.zip tcl-4c0461c1f6d27e2f71bd6aadcf2be1ecd4a4842a.tar.gz tcl-4c0461c1f6d27e2f71bd6aadcf2be1ecd4a4842a.tar.bz2 | |
Revert the colorful debug garbage mistakenly committed.
Diffstat (limited to 'generic/tclPathObj.c')
| -rw-r--r-- | generic/tclPathObj.c | 10 |
1 files changed, 2 insertions, 8 deletions
diff --git a/generic/tclPathObj.c b/generic/tclPathObj.c index ffeb688..5984c16 100644 --- a/generic/tclPathObj.c +++ b/generic/tclPathObj.c @@ -1322,14 +1322,8 @@ TclNewFSPathObj( fsPathPtr->translatedPathPtr = NULL; fsPathPtr->normPathPtr = Tcl_NewStringObj(addStrRep, len); Tcl_IncrRefCount(fsPathPtr->normPathPtr); - - if (TCL_PATH_ABSOLUTE == Tcl_FSGetPathType(dirPtr)) { - fsPathPtr->cwdPtr = Tcl_FSGetNormalizedPath(NULL, dirPtr); - } else { -fprintf(stdout, "FUCKING BROKEN!\n"); fflush(stdout); - fsPathPtr->cwdPtr = dirPtr; - } - Tcl_IncrRefCount(fsPathPtr->cwdPtr); + fsPathPtr->cwdPtr = dirPtr; + Tcl_IncrRefCount(dirPtr); fsPathPtr->nativePathPtr = NULL; fsPathPtr->fsPtr = NULL; fsPathPtr->filesystemEpoch = 0; |