diff options
| author | dgp <dgp@users.sourceforge.net> | 2016-06-20 19:31:05 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2016-06-20 19:31:05 (GMT) |
| commit | df9f4ed74f427b220327be632bff7a3bc54aff68 (patch) | |
| tree | 974b996fd0d221e828a370100264a0a28bf8571b /generic | |
| parent | b300fecc273eaba2438bba8e4719e2f553b73344 (diff) | |
| parent | 8445a0021076cd7ebc53982e380990d3668c4e1f (diff) | |
| download | tcl-df9f4ed74f427b220327be632bff7a3bc54aff68.zip tcl-df9f4ed74f427b220327be632bff7a3bc54aff68.tar.gz tcl-df9f4ed74f427b220327be632bff7a3bc54aff68.tar.bz2 | |
[c383ebb5e4] Match DStringInit and DStringFree properly.
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tclFileName.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclFileName.c b/generic/tclFileName.c index 39bac99..bf463f5 100644 --- a/generic/tclFileName.c +++ b/generic/tclFileName.c @@ -1595,8 +1595,8 @@ Tcl_GlobObjCmd( } else if (dir == PATH_GENERAL) { Tcl_DString str; + Tcl_DStringInit(&str); for (i = 0; i < objc; i++) { - Tcl_DStringInit(&str); if (dir == PATH_GENERAL) { TclDStringAppendDString(&str, &prefix); } |