global-functions: $RmDir: fail on wrong type

This commit is contained in:
Christian Hesse 2025-02-10 11:03:34 +01:00
parent a8e5b5226b
commit 82020ddd73

View file

@ -1014,6 +1014,11 @@
$LogPrint debug $0 ("Removing directory: ". $DirName);
:if ([ :len [ /file/find where name=$DirName type!=directory ] ] > 0) do={
$LogPrint error $0 ("Directory '" . $DirName . "' is not a directory.");
:return false;
}
:local Dir [ /file/find where name=$DirName type=directory ];
:if ([ :len $Dir ] = 0) do={
$LogPrint debug $0 ("... which does not exist.");