luxferre/tii
1
0
Fork 0
Code Actions Activity

Added retry logic to fetching process

Browse Source
This commit is contained in:
Luxferre
2024-10-27 15:18:41 +02:00
parent 4f4f6f7bdb
commit 06e507baae
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
tiifetch.tcl
+1 -1
View File
@@ -154,7 +154,7 @@ proc getfile {url} {
} else {return {}} } else {return {}}
} }
https - http { https - http {
set hs [::http::geturl $url -binary 1 -keepalive 0 -timeout 4000] set hs [::http::geturl $url -binary 1 -keepalive 0 -timeout 10000]
if {[::http::ncode $hs] eq "200"} { if {[::http::ncode $hs] eq "200"} {
return [::http::data $hs] return [::http::data $hs]
} else {return {}} } else {return {}}