paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-22 07:09:29 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Evaluate macros when getting LocalUnitDir and GlobalUnitDir

Browse Source 
git-svn-id: trunk@15168 -
This commit is contained in:
joost 2010-04-24 21:38:07 +00:00
parent 980c353421
commit d27093ceba
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
utils/fppkg/pkgoptions.pp
View File

@ -450,8 +450,8 @@ end;
function TCompilerOptions.LocalUnitDir:string;
begin
if FLocalInstallDir<>'' then
result:=FLocalInstallDir+'units'+PathDelim+CompilerTarget+PathDelim
if LocalInstallDir<>'' then
result:=LocalInstallDir+'units'+PathDelim+CompilerTarget+PathDelim
else
result:='';
end;
@ -459,8 +459,8 @@ end;
function TCompilerOptions.GlobalUnitDir:string;
begin
if FGlobalInstallDir<>'' then
result:=FGlobalInstallDir+'units'+PathDelim+CompilerTarget+PathDelim
if GlobalInstallDir<>'' then
result:=GlobalInstallDir+'units'+PathDelim+CompilerTarget+PathDelim
else
result:='';
end;