mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-08 06:18:21 +02:00
IDE: fixed storing buildmodes, issue #35277, patch from Ondrej
git-svn-id: trunk@60772 -
This commit is contained in:
parent
9fc53439cf
commit
3b972346b3
@ -7413,7 +7413,7 @@ begin
|
||||
for i:=0 to Count-1 do
|
||||
if SaveSession or not Items[i].InSession then
|
||||
Items[i].SaveToXMLConfig(FXMLConfig, Path, i=0, ALegacyList, Cnt);
|
||||
FXMLConfig.SetListItemCount(Path+'BuildModes',Cnt,ALegacyList);
|
||||
FXMLConfig.SetListItemCount(Path+'BuildModes/',Cnt,ALegacyList);
|
||||
end;
|
||||
|
||||
procedure TProjectBuildModes.SaveSessionOptsToXMLConfig(XMLConfig: TXMLConfig;
|
||||
@ -7427,7 +7427,7 @@ begin
|
||||
for i:=0 to Count-1 do
|
||||
if Items[i].InSession and SaveSession then
|
||||
Items[i].SaveToXMLConfig(FXMLConfig, Path, false, ALegacyList, Cnt);
|
||||
FXMLConfig.SetListItemCount(Path+'BuildModes',Cnt,ALegacyList);
|
||||
FXMLConfig.SetListItemCount(Path+'BuildModes/',Cnt,ALegacyList);
|
||||
end;
|
||||
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user