paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-13 12:19:16 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: mode matrix: fixed showing targets

Browse Source 
git-svn-id: branches/fixes_1_2@42835 -
This commit is contained in:
mattias 2013-09-16 08:35:22 +00:00
parent 2aa7fda2a4
commit be4bd35292
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
ide/frames/compiler_modematrix.pas
View File

@ -218,6 +218,7 @@ begin
if OptIndex>=Options.Count then exit;
// compare option
Option:=Options[OptIndex];
//debugln(['IsEqual ',Option.AsString,' Targets="',Option.Targets,'" Target.Value="',Target.Value,'"']);
if Option.Targets<>Target.Value then exit;
if Option.Modes<>ValueRow.GetNormalizedModes then exit;
if Option.Typ<>CaptionToBuildMatrixOptionType(ValueRow.Typ) then exit;
@ -247,8 +248,10 @@ begin
TargetGrp:=nil;
for OptIndex:=0 to Options.Count-1 do begin
Option:=Options[OptIndex];
if (TargetGrp=nil) or (TargetGrp.Value<>Option.Targets) then
if (TargetGrp=nil) or (TargetGrp.Value<>Option.Targets) then begin
TargetGrp:=AddMatrixTarget(Matrix,StorageGroup);
TargetGrp.Value:=Option.Targets;
end;
Value:=Option.Value;
if Option.Typ=bmotIDEMacro then
Value:=Option.MacroName+':='+Value;
@ -278,6 +281,7 @@ begin
exit;
end;
Targets:=UTF8Trim(Target.Value);
//debugln(['AssignBuildMatrixGroupToOptions Targets=',Targets]);
for i:=0 to Target.Count-1 do begin
ValueRow:=TGroupedMatrixValue(Target[i]);
if not (ValueRow is TGroupedMatrixValue) then begin
@ -295,6 +299,7 @@ begin
end else begin
Option.Value:=UTF8Trim(ValueRow.Value);
end;
//debugln(['AssignBuildMatrixGroupToOptions Option=',Option.AsString]);
end;
end;
if InvalidateBuildMacros then