diff options
| author | davygrvy <davygrvy@pobox.com> | 2004-05-10 21:50:37 (GMT) |
|---|---|---|
| committer | davygrvy <davygrvy@pobox.com> | 2004-05-10 21:50:37 (GMT) |
| commit | 44c26c8ef9476ea619f782f2fc3c8956f17702ff (patch) | |
| tree | dbd6dd2f5adccdb2d202651c15cfcb81adacbd71 | |
| parent | 210b1a099c140192b8e2b73358650011e82e13f9 (diff) | |
| download | tcl-44c26c8ef9476ea619f782f2fc3c8956f17702ff.zip tcl-44c26c8ef9476ea619f782f2fc3c8956f17702ff.tar.gz tcl-44c26c8ef9476ea619f782f2fc3c8956f17702ff.tar.bz2 | |
(BuildCommandLine): Use the existence of contents in the linePtr rather
than the scratch DString post the append, as this more clear.
| -rw-r--r-- | win/tclWinPipe.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/win/tclWinPipe.c b/win/tclWinPipe.c index 995c154..9653545 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.46 2004/05/10 20:51:11 davygrvy Exp $ + * RCS: @(#) $Id: tclWinPipe.c,v 1.47 2004/05/10 21:50:37 davygrvy Exp $ */ #include "tclWinInt.h" @@ -1576,7 +1576,7 @@ BuildCommandLine( */ Tcl_DStringAppend(&ds, Tcl_DStringValue(linePtr), -1); - if (Tcl_DStringLength(&ds) > 0) Tcl_DStringAppend(&ds, " ", 1); + if (Tcl_DStringLength(linePtr) > 0) Tcl_DStringAppend(&ds, " ", 1); for (i = 0; i < argc; i++) { if (i == 0) { |