From 8231c3e833ee83a118f4d8395c097e6a9f312c2f Mon Sep 17 00:00:00 2001
From: Christian Hesse <mail@eworm.de>
Date: Wed, 11 Dec 2024 10:40:06 +0100
Subject: [PATCH] global-functions: $WaitForFile: delay until "complete"...
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

Well, turns out that waiting for existence of a file is not sufficient.
Chances are that a file is available just partly, so wait until the size
no longer changes... Let's hope that works as expected. 🤞
---
 global-functions.rsc | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/global-functions.rsc b/global-functions.rsc
index 625f8cd..e5e5d50 100644
--- a/global-functions.rsc
+++ b/global-functions.rsc
@@ -1577,6 +1577,16 @@
     :delay $Delay;
     :set I ($I + 1);
   }
+
+  :local File [ /file/find where name=$FileName ];
+  :local SizeA 0;
+  :local SizeB 1;
+  :while ($SizeA < $SizeB) do={
+    :set SizeA $SizeB;
+    :delay $Delay;
+    :set SizeB [ /file/get $File size ];
+  }
+
   :return true;
 }