paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-05 23:58:06 +02:00
Code Issues Packages Projects Releases Wiki Activity

ide: what needs build dialog: fixed passing build all

Browse Source
This commit is contained in:
mattias 2024-10-24 10:45:29 +02:00
parent 445ae535ce
commit e2ab5efb7b
2 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/ideinfoneedbuild.pas
View File

@ -302,6 +302,7 @@ begin
else if Item.Target is TProject then begin
AProject:=TProject(Item.Target);
Item.Note:='';
NeedBuildAll:=false;
NeedBuild:=MainBuildBoss.DoCheckIfProjectNeedsCompilation(AProject,
NeedBuildAll,Item.Note);
if NeedBuild=mrYes then begin
@ -314,6 +315,7 @@ begin
else if Item.Target is TLazPackage then begin
Pkg:=TLazPackage(Item.Target);
Item.Note:='';
NeedBuildAll:=false;
NeedBuild:=PackageGraph.CheckIfPackageNeedsCompilation(
Pkg,SkipDesignTimePackages,true,NeedBuildAll,Item.Note);
if NeedBuild=mrYes then begin

2
ide/packages/idepackager/packagesystem.pas
View File

@ -3652,7 +3652,7 @@ var
begin
Result:=mrYes;
{$IFDEF VerbosePkgCompile}
debugln('TLazPackageGraph.CheckIfPackageNeedsCompilation A ',APackage.IDAsString);
debugln(['TLazPackageGraph.CheckIfPackageNeedsCompilation A ',APackage.IDAsString,' NeedBuildAllFlag=',NeedBuildAllFlag]);
{$ENDIF}
ForceBuild:=NeedBuildAllFlag;
if ForceBuild then begin