diff options
Diffstat (limited to 'doc/string.n')
-rw-r--r-- | doc/string.n | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/doc/string.n b/doc/string.n index 1e174c1..302f59e 100644 --- a/doc/string.n +++ b/doc/string.n @@ -5,7 +5,7 @@ '\" See the file "license.terms" for information on usage and redistribution '\" of this file, and for a DISCLAIMER OF ALL WARRANTIES. '\" -'\" RCS: @(#) $Id: string.n,v 1.32 2006/11/22 23:22:23 dkf Exp $ +'\" RCS: @(#) $Id: string.n,v 1.33 2006/12/14 10:22:03 dkf Exp $ '\" .so man.macros .TH string n 8.1 Tcl "Tcl Built-In Commands" @@ -356,7 +356,7 @@ set length [\fBstring length\fR $string] if {$length == 0} { set isPrefix 0 } else { - set isPrefix [\fBstring equal\fR -length $string $string "foobar"] + set isPrefix [\fBstring equal\fR -length $length $string "foobar"] } .CE |