From fa0cec87e3c5670b11c89aef1aba30201a22ea43 Mon Sep 17 00:00:00 2001 From: dgp Date: Tue, 21 Jun 2016 11:10:10 +0000 Subject: Repair earlier bug fix. Stopped crash, but botched the logic for multiple glob patterns. --- generic/tclFileName.c | 1 + 1 file changed, 1 insertion(+) diff --git a/generic/tclFileName.c b/generic/tclFileName.c index bf463f5..2136883 100644 --- a/generic/tclFileName.c +++ b/generic/tclFileName.c @@ -1597,6 +1597,7 @@ Tcl_GlobObjCmd( Tcl_DStringInit(&str); for (i = 0; i < objc; i++) { + Tcl_DStringSetLength(&str, 0); if (dir == PATH_GENERAL) { TclDStringAppendDString(&str, &prefix); } -- cgit v0.12