Browse Source

* Also check TMPDIR, a UNIX standard used by a.o. iOS (mantis #20248)

git-svn-id: trunk@19175 -
michael 14 years ago
parent
commit
1579470a68
1 changed files with 2 additions and 0 deletions
  1. 2 0
      rtl/unix/sysutils.pp

+ 2 - 0
rtl/unix/sysutils.pp

@@ -1344,6 +1344,8 @@ begin
     Result:=GetEnvironmentVariable('TEMP');
     If (Result='') Then
       Result:=GetEnvironmentVariable('TMP');
+    If (Result='') Then
+      Result:=GetEnvironmentVariable('TMPDIR');
     if (Result='') then
       Result:='/tmp/' // fallback.
     end;