diff options
| author | hobbs <hobbs> | 2008-04-07 22:27:40 (GMT) |
|---|---|---|
| committer | hobbs <hobbs> | 2008-04-07 22:27:40 (GMT) |
| commit | 96a6fac144d34cba9596355d01ac7983ed948f43 (patch) | |
| tree | bf3404678960eff2c73e0d993082cd83d4064ddd /generic/tkArgv.c | |
| parent | c2b55e4312dad7264c31f53fdfc1db949a23bf7d (diff) | |
| download | tk-96a6fac144d34cba9596355d01ac7983ed948f43.zip tk-96a6fac144d34cba9596355d01ac7983ed948f43.tar.gz tk-96a6fac144d34cba9596355d01ac7983ed948f43.tar.bz2 | |
use kenny variant for 1936238 fix
Diffstat (limited to 'generic/tkArgv.c')
| -rw-r--r-- | generic/tkArgv.c | 16 |
1 files changed, 4 insertions, 12 deletions
diff --git a/generic/tkArgv.c b/generic/tkArgv.c index 55fe45e..0e60295 100644 --- a/generic/tkArgv.c +++ b/generic/tkArgv.c @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkArgv.c,v 1.12 2008/04/07 18:39:36 hobbs Exp $ + * RCS: @(#) $Id: tkArgv.c,v 1.13 2008/04/07 22:27:41 hobbs Exp $ */ #include "tkInt.h" @@ -337,10 +337,7 @@ PrintUsage( * for default options. */ { register Tk_ArgvInfo *infoPtr; - size_t width, i; - int numSpaces; /* must be int to allow for negative values */ -#define NUM_SPACES 20 - static char spaces[] = " "; + size_t width, i, numSpaces; char tmp[TCL_DOUBLE_SPACE]; /* @@ -373,13 +370,8 @@ PrintUsage( } Tcl_AppendResult(interp, "\n ", infoPtr->key, ":", NULL); numSpaces = width + 1 - strlen(infoPtr->key); - while (numSpaces > 0) { - if (numSpaces >= NUM_SPACES) { - Tcl_AppendResult(interp, spaces, NULL); - } else { - Tcl_AppendResult(interp, spaces+NUM_SPACES-numSpaces,NULL); - } - numSpaces -= NUM_SPACES; + while (numSpaces-- > 0) { + Tcl_AppendResult(interp, " ", NULL); } Tcl_AppendResult(interp, infoPtr->help, NULL); switch (infoPtr->type) { |