diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2011-06-01 14:54:52 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2011-06-01 14:54:52 (GMT) |
| commit | 5d982178ea4904932de32a6331512d6db0174a91 (patch) | |
| tree | cccd80e15a5ab4f773baa3a262941addef161e26 /library/http/http.tcl | |
| parent | 598a2d7dd6d3830c59de31a4b4af8ccf1991fdc4 (diff) | |
| parent | c31b5e030892e09c7f5bdc8538ecc09b760bab3b (diff) | |
| download | tcl-bug_3185407.zip tcl-bug_3185407.tar.gz tcl-bug_3185407.tar.bz2 | |
Merge from 8.5 branch tipbug_3185407
Diffstat (limited to 'library/http/http.tcl')
| -rw-r--r-- | library/http/http.tcl | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/library/http/http.tcl b/library/http/http.tcl index 87af637..aaef2b8 100644 --- a/library/http/http.tcl +++ b/library/http/http.tcl @@ -11,7 +11,7 @@ package require Tcl 8.4 # Keep this in sync with pkgIndex.tcl and with the install directories in # Makefiles -package provide http 2.7.5 +package provide http 2.7.6 namespace eval http { # Allow resourcing to not clobber existing data @@ -900,7 +900,6 @@ proc http::Write {token} { incr state(queryoffset) $state(-queryblocksize) if {$state(queryoffset) >= $state(querylength)} { set state(queryoffset) $state(querylength) - puts $sock "" set done 1 } } else { |