Update Shared.CommonFunc.pas

michelcedric · Oct 30, 2024 · c102522 · c102522
1 parent 4420840
commit c102522
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/Projects/Src/Shared.CommonFunc.pas b/Projects/Src/Shared.CommonFunc.pas
@@ -754,6 +754,9 @@ function GetTempDir: String;
   differences. }
 label 1;
 begin
+  Result := GetEnv('INNOSETUPTMP');
+  if (Result <> '') and DirExists(Result) then
+    goto 1;
   Result := GetEnv('TMP');
   if (Result <> '') and DirExists(Result) then
     goto 1;