From 7ed54a4fe749a6bfd4e58c2063abb4a13bdebe31 Mon Sep 17 00:00:00 2001
From: Christian Hesse <mail@eworm.de>
Date: Thu, 29 Apr 2021 14:54:49 +0200
Subject: global-functions: $DownloadPackage: be more verbose

---
 global-functions | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/global-functions b/global-functions
index 2ce60f6..65c9721 100644
--- a/global-functions
+++ b/global-functions
@@ -264,7 +264,7 @@
   :local PkgDest [ $CleanFilePath ($PkgDir . "/" . $PkgFile) ];
 
   :if ([ :len [ / file find where name=$PkgDest type="package" ] ] > 0) do={
-    $LogPrintExit2 info $0 ("Package file already exists.") false;
+    $LogPrintExit2 info $0 ("Package file " . $PkgName . " already exists.") false;
     :return true;
   }
 
@@ -272,6 +272,7 @@
     $LogPrintExit2 error $0 ("Downloading required certificate failed.") true;
   }
 
+  $LogPrintExit2 info $0 ("Downloading package file " . $PkgName . "...") false;
   :local Retry 3;
   :while ($Retry > 0) do={
     :do {
@@ -284,13 +285,14 @@
         :return true;
       }
     } on-error={
-      $LogPrintExit2 debug $0 ("Downloading package failed.") false;
+      $LogPrintExit2 debug $0 ("Downloading package file failed.") false;
     }
 
     / file remove [ find where name=$PkgDest ];
     :set Retry ($Retry - 1);
   }
 
+  $LogPrintExit2 warning $0 ("Downloading package file " . $PkgName . " failed.") false;
   :return false;
 }
 
-- 
cgit v1.2.3-54-g00ecf