added directory create

HashLoad · Jul 23, 2019 · 253fbea · 253fbea
1 parent fbd6be0
commit 253fbea
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/src/core/Boss.Modules.PackageProcessor.pas b/src/core/Boss.Modules.PackageProcessor.pas
@@ -78,6 +78,9 @@ function TBossPackageProcessor.GetEnv(AEnv: string): string;
 begin
   Result := GetEnvironmentVariable('HOMEDRIVE') + GetEnvironmentVariable('HOMEPATH') + TPath.DirectorySeparatorChar +
     C_BOSS_CACHE_FOLDER + TPath.DirectorySeparatorChar + C_ENV + AEnv;
+
+  if DirectoryExists(GetEnv(EmptyStr)) then
+    ForceDirectories(GetEnv(EmptyStr));
 end;