diff options
Diffstat (limited to 'ds9/library/url.tcl')
| -rw-r--r-- | ds9/library/url.tcl | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/ds9/library/url.tcl b/ds9/library/url.tcl index d8f21ee..1c159f9 100644 --- a/ds9/library/url.tcl +++ b/ds9/library/url.tcl @@ -44,12 +44,13 @@ proc GetFileHTTP {url fn} { if {[catch {http::geturl $url \ -channel $ch \ -binary 1 \ + -keepalive 1 \ + -timeout $ihttp(timeout) \ -headers "[ProxyHTTP]"} token]} { close $ch return } - # -timeout $ihttp(timeout) \ # reset errorInfo (may be set in http::geturl) global errorInfo @@ -141,9 +142,10 @@ proc LoadURLFitsHTTP {url layer mode} { set token [http::geturl $url \ -channel $ch \ -binary 1 \ + -keepalive 1 \ + -timeout $ihttp(timeout) \ -headers "[ProxyHTTP]"] - # -timeout $ihttp(timeout) \ # reset errorInfo (may be set in http::geturl) global errorInfo |