diff options
| author | William Joye <wjoye@cfa.harvard.edu> | 2018-10-17 16:32:09 (GMT) |
|---|---|---|
| committer | William Joye <wjoye@cfa.harvard.edu> | 2018-10-17 16:32:09 (GMT) |
| commit | e41074ead0ab0d705d8370b770db68fc99c3eaae (patch) | |
| tree | dd19cf3f68299ea1ea0db65ac3290f2708722a83 /ds9/library/url.tcl | |
| parent | a2547d4fc66d7e76bfff3ad8ede3cffc95487704 (diff) | |
| download | blt-e41074ead0ab0d705d8370b770db68fc99c3eaae.zip blt-e41074ead0ab0d705d8370b770db68fc99c3eaae.tar.gz blt-e41074ead0ab0d705d8370b770db68fc99c3eaae.tar.bz2 | |
reset http token in case of error
Diffstat (limited to 'ds9/library/url.tcl')
| -rw-r--r-- | ds9/library/url.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ds9/library/url.tcl b/ds9/library/url.tcl index 1c159f9..ac217b6 100644 --- a/ds9/library/url.tcl +++ b/ds9/library/url.tcl @@ -146,7 +146,6 @@ proc LoadURLFitsHTTP {url layer mode} { -timeout $ihttp(timeout) \ -headers "[ProxyHTTP]"] - # reset errorInfo (may be set in http::geturl) global errorInfo set errorInfo {} @@ -215,6 +214,7 @@ proc LoadURLFitsHTTP {url layer mode} { default { Error "HTTP [msgcat::mc {Error}] $code" + http::reset $token return } } |