aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authork-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c>2008-09-04 23:08:20 +0000
committerk-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c>2008-09-04 23:08:20 +0000
commitbaa8e6ee782197a75038d0ab39c53f231bb66ba7 (patch)
treea5e9e38fe9d5ac5ca54db0ab9a6991609c5e84fa
parent0d59e17338bb4707a94de773e6f44f9a426fdca0 (diff)
downloadusdx-baa8e6ee782197a75038d0ab39c53f231bb66ba7.tar.gz
usdx-baa8e6ee782197a75038d0ab39c53f231bb66ba7.tar.xz
usdx-baa8e6ee782197a75038d0ab39c53f231bb66ba7.zip
not needed test on presence of dir removed. Courtesy to tobigun
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1345 b956fd51-792f-4845-bead-9b4dfca2ff2c
-rw-r--r--src/base/UPlatformMacOSX.pas3
1 files changed, 1 insertions, 2 deletions
diff --git a/src/base/UPlatformMacOSX.pas b/src/base/UPlatformMacOSX.pas
index 217d4755..788e0dda 100644
--- a/src/base/UPlatformMacOSX.pas
+++ b/src/base/UPlatformMacOSX.pas
@@ -190,8 +190,7 @@ begin
until (DirectoryIsFinished = DirectoryList.Count);
// create missing folders
- if not DirectoryExists(UserPathName) then
- ForceDirectories(UserPathName);
+ ForceDirectories(UserPathName); / should not be necessary since (UserPathName+'/.') is created.
for Counter := 0 to DirectoryList.Count-1 do
begin
if not ForceDirectories(UserPathName + '/' + DirectoryList[Counter]) then