diff options
Diffstat (limited to 'doc/fcopy.n')
| -rw-r--r-- | doc/fcopy.n | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/doc/fcopy.n b/doc/fcopy.n index 30b8dfe..bb0f534 100644 --- a/doc/fcopy.n +++ b/doc/fcopy.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: fcopy.n,v 1.3 2001/05/19 16:59:04 andreas_kupries Exp $ +'\" RCS: @(#) $Id: fcopy.n,v 1.3.14.1 2007/01/29 16:50:35 dgp Exp $ '\" .so man.macros .TH fcopy n 8.0 Tcl "Tcl Built-In Commands" @@ -115,7 +115,7 @@ in the command callback proc CopyMore {in out chunk bytes {error {}}} { global total done incr total $bytes - if {([string length $error] != 0) || [eof $in] { + if {([string length $error] != 0) || [eof $in]} { set done $total close $in close $out |