fw-addr-lists: use prepared user-agent string with fetch

This commit is contained in:
Christian Hesse 2024-01-19 13:25:22 +01:00
parent a2749b2760
commit 4b8854946d

View file

@ -10,6 +10,7 @@
:global GlobalFunctionsReady; :global GlobalFunctionsReady;
:while ($GlobalFunctionsReady != true) do={ :delay 500ms; } :while ($GlobalFunctionsReady != true) do={ :delay 500ms; }
:global FetchUserAgent;
:global FwAddrLists; :global FwAddrLists;
:global FwAddrListTimeOut; :global FwAddrListTimeOut;
@ -57,7 +58,7 @@ $WaitFullyConnected;
:if ($Data = false) do={ :if ($Data = false) do={
:do { :do {
:set Data ([ /tool/fetch check-certificate=$CheckCertificate output=user \ :set Data ([ /tool/fetch check-certificate=$CheckCertificate output=user \
($List->"url") as-value ]->"data"); http-header-field=({ $FetchUserAgent }) ($List->"url") as-value ]->"data");
} on-error={ } on-error={
:if ($I < 4) do={ :if ($I < 4) do={
$LogPrintExit2 debug $0 ("Failed downloading, " . $I . ". try: " . $List->"url") false; $LogPrintExit2 debug $0 ("Failed downloading, " . $I . ". try: " . $List->"url") false;