mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-18 03:19:17 +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
|
for i:=0 to Count-1 do
|
||||||
if SaveSession or not Items[i].InSession then
|
if SaveSession or not Items[i].InSession then
|
||||||
Items[i].SaveToXMLConfig(FXMLConfig, Path, i=0, ALegacyList, Cnt);
|
Items[i].SaveToXMLConfig(FXMLConfig, Path, i=0, ALegacyList, Cnt);
|
||||||
FXMLConfig.SetListItemCount(Path+'BuildModes',Cnt,ALegacyList);
|
FXMLConfig.SetListItemCount(Path+'BuildModes/',Cnt,ALegacyList);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TProjectBuildModes.SaveSessionOptsToXMLConfig(XMLConfig: TXMLConfig;
|
procedure TProjectBuildModes.SaveSessionOptsToXMLConfig(XMLConfig: TXMLConfig;
|
||||||
@ -7427,7 +7427,7 @@ begin
|
|||||||
for i:=0 to Count-1 do
|
for i:=0 to Count-1 do
|
||||||
if Items[i].InSession and SaveSession then
|
if Items[i].InSession and SaveSession then
|
||||||
Items[i].SaveToXMLConfig(FXMLConfig, Path, false, ALegacyList, Cnt);
|
Items[i].SaveToXMLConfig(FXMLConfig, Path, false, ALegacyList, Cnt);
|
||||||
FXMLConfig.SetListItemCount(Path+'BuildModes',Cnt,ALegacyList);
|
FXMLConfig.SetListItemCount(Path+'BuildModes/',Cnt,ALegacyList);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user