paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-16 11:09:32 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: changed default tmp directory for unix to ~/tmp, bug #24816

Browse Source 
git-svn-id: trunk@42334 -
This commit is contained in:
mattias 2013-08-04 19:41:11 +00:00
parent 4c787fc885
commit 0fbb1e90df
2 changed files with 6 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
ide/include/unix/lazbaseconf.inc
View File

@ -93,11 +93,7 @@ end;
function GetDefaultTestBuildDirectory: string;
begin
Result:='/tmp/';
if not DirPathExists(Result) then begin
if DirPathExists('/var/tmp/') then
Result:='/var/tmp/';
end;
Result:='~/tmp/';
end;
procedure GetDefaultCompilerFilenames(List: TStrings);
@ -114,6 +110,7 @@ end;
procedure GetDefaultTestBuildDirs(List: TStrings);
begin
AddFilenameToList(List,'~/tmp/');
AddFilenameToList(List,'/tmp/');
AddFilenameToList(List,'/var/tmp/');
end;

4
ide/main.pp
View File

@ -6765,6 +6765,10 @@ var
begin
Result:=mrCancel;
TestDir:=GetTestBuildDirectory;
if (TestDir<>'') then begin
Result:=ForceDirectoryInteractive(TestDir,[]);
if Result<>mrOk then exit;
end;
if (TestDir='')
or (not DirPathExists(TestDir)) then begin
if (TestDir<>'') then begin