diff options
| author | donal.k.fellows@manchester.ac.uk <dkf> | 2006-12-14 10:22:02 (GMT) |
|---|---|---|
| committer | donal.k.fellows@manchester.ac.uk <dkf> | 2006-12-14 10:22:02 (GMT) |
| commit | 71ce8c5859b36a642bd7fa33e3aef6f24008556e (patch) | |
| tree | c1424514d4e8feb3fa265966f83d9e28b528fec2 /doc/string.n | |
| parent | 3863bbf082b19a62b21e6f592d1bf2062fd4d2f5 (diff) | |
| download | tcl-71ce8c5859b36a642bd7fa33e3aef6f24008556e.zip tcl-71ce8c5859b36a642bd7fa33e3aef6f24008556e.tar.gz tcl-71ce8c5859b36a642bd7fa33e3aef6f24008556e.tar.bz2 | |
Fix example. [Bug 1615277]
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 |