From 402f847db2b7446a67634d3720d824a7e6b87e71 Mon Sep 17 00:00:00 2001
From: Christian Hesse <mail@eworm.de>
Date: Wed, 3 Apr 2024 17:36:47 +0200
Subject: global-functions: $FetchHuge: remove file on failed download

---
 global-functions.rsc | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/global-functions.rsc b/global-functions.rsc
index 3c14f22..ab8860f 100644
--- a/global-functions.rsc
+++ b/global-functions.rsc
@@ -417,6 +417,9 @@
     /tool/fetch check-certificate=$CheckCert $Url dst-path=$FileName \
       http-header-field=({ [ $FetchUserAgentStr $ScriptName ] }) as-value;
   } on-error={
+    :if ([ $WaitForFile $FileName 500ms ] = true) do={
+      /file/remove $FileName;
+    }
     $LogPrint debug $0 ("Failed downloading from: " . $Url);
     :return false;
   }
-- 
cgit v1.2.3-54-g00ecf