From e14e94162a88fb1990ce727cd933e0b4dfd15133 Mon Sep 17 00:00:00 2001
From: Christian Hesse <mail@eworm.de>
Date: Fri, 30 May 2025 20:42:25 +0200
Subject: [PATCH] global-functions: $MkDir: work around restrictions in new
 file handling

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

diff --git a/global-functions.rsc b/global-functions.rsc
index 759b2744..89fff7c3 100644
--- a/global-functions.rsc
+++ b/global-functions.rsc
@@ -917,7 +917,9 @@
 
   $LogPrint debug $0 ("Making directory: " . $Path);
 
-  :if ([ :len [ /file/find where name=$Path type="directory" ] ] = 1) do={
+  :local PathVal;
+  :do { :set PathVal [ /file/get $Path ]; } on-error={ }
+  :if ($PathVal->"type"="directory") do={
     $LogPrint debug $0 ("... which already exists.");
     :return true;
   }