Browse Source

* compile fixed

git-svn-id: trunk@8944 -
peter 18 years ago
parent
commit
94aa14018d
2 changed files with 3 additions and 1 deletions
  1. 1 1
      utils/fppkg/fppkg.pp
  2. 2 0
      utils/fppkg/pkgcommands.pp

+ 1 - 1
utils/fppkg/fppkg.pp

@@ -121,7 +121,7 @@ begin
       if Options.CurrentCompilerConfig='default' then
       if Options.CurrentCompilerConfig='default' then
         begin
         begin
           Log(vDebug,SLogGeneratingCompilerConfig,[S]);
           Log(vDebug,SLogGeneratingCompilerConfig,[S]);
-          Options.InitCompilerDefaults('');
+          Options.InitCompilerDefaults;
           Options.SaveCompilerToFile(S);
           Options.SaveCompilerToFile(S);
         end
         end
       else
       else

+ 2 - 0
utils/fppkg/pkgcommands.pp

@@ -77,9 +77,11 @@ type
 
 
 function TCommandAddConfig.Execute(const Args:TActionArgs):boolean;
 function TCommandAddConfig.Execute(const Args:TActionArgs):boolean;
 begin
 begin
+{
   Log(vInfo,SLogGeneratingCompilerConfig,[S]);
   Log(vInfo,SLogGeneratingCompilerConfig,[S]);
   Options.InitCompilerDefaults(Args[2]);
   Options.InitCompilerDefaults(Args[2]);
   Options.SaveCompilerToFile(S);
   Options.SaveCompilerToFile(S);
+}
   Result:=true;
   Result:=true;
 end;
 end;