Browse Source

* Evaluate macros when getting LocalUnitDir and GlobalUnitDir

git-svn-id: trunk@15168 -
joost 15 years ago
parent
commit
d27093ceba
1 changed files with 4 additions and 4 deletions
  1. 4 4
      utils/fppkg/pkgoptions.pp

+ 4 - 4
utils/fppkg/pkgoptions.pp

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