diff options
| author | dgp <dgp@users.sourceforge.net> | 2016-06-22 18:40:23 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2016-06-22 18:40:23 (GMT) |
| commit | 7f1b79bfa4e453ad1ba7dd6bb7ea48fa108aa674 (patch) | |
| tree | 3f0066626868ab629714327931e8f7413b72425e /generic/tclFileName.c | |
| parent | 9a5a1ee7cfd6c804f412cbfcc4b96d95614cebb3 (diff) | |
| parent | f26610cd68a05e3e665dcd0fb29fc8e20326fbfe (diff) | |
| download | tcl-7f1b79bfa4e453ad1ba7dd6bb7ea48fa108aa674.zip tcl-7f1b79bfa4e453ad1ba7dd6bb7ea48fa108aa674.tar.gz tcl-7f1b79bfa4e453ad1ba7dd6bb7ea48fa108aa674.tar.bz2 | |
merge trunk
Diffstat (limited to 'generic/tclFileName.c')
| -rw-r--r-- | generic/tclFileName.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/generic/tclFileName.c b/generic/tclFileName.c index 3d33271..74f7b21 100644 --- a/generic/tclFileName.c +++ b/generic/tclFileName.c @@ -1609,6 +1609,7 @@ Tcl_GlobObjCmd( Tcl_DStringInit(&str); for (i = 0; i < objc; i++) { + Tcl_DStringSetLength(&str, 0); if (dir == PATH_GENERAL) { TclDStringAppendDString(&str, &prefix); } |