diff options
| -rw-r--r-- | src/base/UPlatformMacOSX.pas | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/base/UPlatformMacOSX.pas b/src/base/UPlatformMacOSX.pas index 2ab2a390..217d4755 100644 --- a/src/base/UPlatformMacOSX.pas +++ b/src/base/UPlatformMacOSX.pas @@ -190,6 +190,8 @@ begin until (DirectoryIsFinished = DirectoryList.Count); // create missing folders + if not DirectoryExists(UserPathName) then + ForceDirectories(UserPathName); for Counter := 0 to DirectoryList.Count-1 do begin if not ForceDirectories(UserPathName + '/' + DirectoryList[Counter]) then |