Преглед на файлове

* Evaluate macros when getting LocalUnitDir and GlobalUnitDir

git-svn-id: trunk@15168 -
joost преди 15 години
родител
ревизия
d27093ceba
променени са 1 файла, в които са добавени 4 реда и са изтрити 4 реда
  1. 4 4
      utils/fppkg/pkgoptions.pp

+ 4 - 4
utils/fppkg/pkgoptions.pp

@@ -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;