diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-09-17 09:27:44 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-09-17 09:27:44 (GMT) |
commit | bc10bf6d03a6c8685c64e36a6095e289e2b1ef33 (patch) | |
tree | d560f690b9bdd6294623904e6273d37b937a872e /doc/chan.n | |
parent | 32975bd346263a3ab1f6bcf46adadfdddd3ffe03 (diff) | |
parent | e14285c3a1d7dd2d7407fda5a5c841ccb5cae488 (diff) | |
download | tcl-bc10bf6d03a6c8685c64e36a6095e289e2b1ef33.zip tcl-bc10bf6d03a6c8685c64e36a6095e289e2b1ef33.tar.gz tcl-bc10bf6d03a6c8685c64e36a6095e289e2b1ef33.tar.bz2 |
Change version number of http package from 2.9.5 -> 2.10.0a1, since it's different from the 2.9.5 version in Tcl 8.6.x.
Use "$idx >= 0" check in stead of "$idx > -1" everywhere.
Diffstat (limited to 'doc/chan.n')
-rw-r--r-- | doc/chan.n | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -772,7 +772,7 @@ set offset 0 \fI# Search for string "FOOBAR" in the file\fR while {[\fBchan gets\fR $f line] >= 0} { set idx [string first FOOBAR $line] - if {$idx > -1} { + if {$idx >= 0} { \fI# Found it; rewrite line\fR \fBchan seek\fR $f [expr {$offset + $idx}] |