ide: fixed name

This commit is contained in:
mattias 2024-06-18 17:07:51 +02:00
parent 7ca632d8d9
commit fa535070e5

View File

@ -65,7 +65,7 @@ type
procedure GatherGlobalOptions(sl: TStrings); procedure GatherGlobalOptions(sl: TStrings);
procedure GatherProjectOptions(sl: TStrings); procedure GatherProjectOptions(sl: TStrings);
procedure GatherActiveOptions(sl: TStrings); procedure GatherActiveOptions(sl: TStrings);
procedure GatherFPCExecutable(UnitSetCache: TFPCUnitSetCache; sl: TStrings); procedure GatherFPCConfig(UnitSetCache: TFPCUnitSetCache; sl: TStrings);
public public
end; end;
@ -128,7 +128,7 @@ begin
FPCSrcDir:=EnvironmentOptions.GetParsedFPCSourceDirectory; // needs FPCVer macro FPCSrcDir:=EnvironmentOptions.GetParsedFPCSourceDirectory; // needs FPCVer macro
UnitSetCache:=CodeToolBoss.CompilerDefinesCache.FindUnitSet( UnitSetCache:=CodeToolBoss.CompilerDefinesCache.FindUnitSet(
CompilerFilename,TargetOS,TargetCPU,Subtarget,'',FPCSrcDir,'',true); CompilerFilename,TargetOS,TargetCPU,Subtarget,'',FPCSrcDir,'',true);
GatherFPCExecutable(UnitSetCache,sl); GatherFPCConfig(UnitSetCache,sl);
ValuesMemo.Lines.Assign(sl); ValuesMemo.Lines.Assign(sl);
finally finally
@ -302,7 +302,7 @@ begin
sl.Add(''); sl.Add('');
end; end;
procedure TIDEFPCInfoDialog.GatherFPCExecutable(UnitSetCache: TFPCUnitSetCache; procedure TIDEFPCInfoDialog.GatherFPCConfig(UnitSetCache: TFPCUnitSetCache;
sl: TStrings); sl: TStrings);
var var
CfgCache: TPCTargetConfigCache; CfgCache: TPCTargetConfigCache;