diff options
Diffstat (limited to 'library/http/http.tcl')
-rw-r--r-- | library/http/http.tcl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/library/http/http.tcl b/library/http/http.tcl index a30c576..6f0f4ce 100644 --- a/library/http/http.tcl +++ b/library/http/http.tcl @@ -867,6 +867,7 @@ proc http::cleanup {token} { proc http::Connect {token} { variable $token upvar 0 $token state + set err "due to unexpected EOF" if { [eof $state(sock)] || [set err [fconfigure $state(sock) -error]] ne "" |