From 978c03131a905c1a6892c9d2fbb049256af2c263 Mon Sep 17 00:00:00 2001
From: Christian Hesse <mail@eworm.de>
Date: Thu, 2 Feb 2023 11:05:16 +0100
Subject: global-functions: $WaitForFile: use delay instead of iterations

---
 global-functions | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

(limited to 'global-functions')

diff --git a/global-functions b/global-functions
index 2f57fae..d2f911e 100644
--- a/global-functions
+++ b/global-functions
@@ -1213,20 +1213,21 @@
 
 # wait for file to be available
 :set WaitForFile do={
-  :local FileName [ :tostr $1 ];
-  :local Iter     [ :tonum $2 ];
+  :local FileName [ :tostr  $1 ];
+  :local WaitTime [ :totime $2 ];
 
   :global CleanFilePath;
   :global EitherOr;
 
   :set FileName [ $CleanFilePath $FileName ];
-  :local I 0;
+  :local I 1;
+  :local Delay ([ :totime [ $EitherOr $WaitTime 2s ] ] / 20);
 
   :while ([ :len [ /file/find where name=$FileName ] ] = 0) do={
-    :if ($I > [ $EitherOr $Iter 20 ]) do={
+    :if ($I >= 20) do={
       :return false;
     }
-    :delay 100ms;
+    :delay $Delay;
     :set I ($I + 1);
   }
   :return true;
-- 
cgit v1.2.3-70-g09d2