diff options
author | andreas_kupries <akupries@shaw.ca> | 2002-06-17 20:05:49 (GMT) |
---|---|---|
committer | andreas_kupries <akupries@shaw.ca> | 2002-06-17 20:05:49 (GMT) |
commit | d791a1f9dbfd5b4dd46a45187426558573eec9ce (patch) | |
tree | f5b2f06eebc4e090060919202f111fc9d19cf9ac /win | |
parent | 9153e89fb7f07be33d811904b905fd07fe8af916 (diff) | |
download | tcl-d791a1f9dbfd5b4dd46a45187426558573eec9ce.zip tcl-d791a1f9dbfd5b4dd46a45187426558573eec9ce.tar.gz tcl-d791a1f9dbfd5b4dd46a45187426558573eec9ce.tar.bz2 |
* win/tclWinPipe.c (BuildCommandLine): Fixed bug #554068 ([exec]
on windows did not treat { in filenames well.). Bug reported by
Vince Darley <vincentdarley@users.sourceforge.net>, patch
provided by Vince too.
Diffstat (limited to 'win')
-rw-r--r-- | win/tclWinPipe.c | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/win/tclWinPipe.c b/win/tclWinPipe.c index d20aa3d..b02bb3b 100644 --- a/win/tclWinPipe.c +++ b/win/tclWinPipe.c @@ -9,7 +9,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclWinPipe.c,v 1.24 2002/03/24 11:41:51 vincentdarley Exp $ + * RCS: @(#) $Id: tclWinPipe.c,v 1.25 2002/06/17 20:05:49 andreas_kupries Exp $ */ #include "tclWinInt.h" @@ -1592,6 +1592,11 @@ BuildCommandLine( Tcl_DStringAppend(&ds, "\\\"", 2); start = special + 1; } + if (*special == '{') { + Tcl_DStringAppend(&ds, start, special - start); + Tcl_DStringAppend(&ds, "\\{", 2); + start = special + 1; + } if (*special == '\0') { break; } |