mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-06-09 03:38:17 +02:00
ide: what needs build dialog: fixed passing build all
This commit is contained in:
parent
445ae535ce
commit
e2ab5efb7b
@ -302,6 +302,7 @@ begin
|
|||||||
else if Item.Target is TProject then begin
|
else if Item.Target is TProject then begin
|
||||||
AProject:=TProject(Item.Target);
|
AProject:=TProject(Item.Target);
|
||||||
Item.Note:='';
|
Item.Note:='';
|
||||||
|
NeedBuildAll:=false;
|
||||||
NeedBuild:=MainBuildBoss.DoCheckIfProjectNeedsCompilation(AProject,
|
NeedBuild:=MainBuildBoss.DoCheckIfProjectNeedsCompilation(AProject,
|
||||||
NeedBuildAll,Item.Note);
|
NeedBuildAll,Item.Note);
|
||||||
if NeedBuild=mrYes then begin
|
if NeedBuild=mrYes then begin
|
||||||
@ -314,6 +315,7 @@ begin
|
|||||||
else if Item.Target is TLazPackage then begin
|
else if Item.Target is TLazPackage then begin
|
||||||
Pkg:=TLazPackage(Item.Target);
|
Pkg:=TLazPackage(Item.Target);
|
||||||
Item.Note:='';
|
Item.Note:='';
|
||||||
|
NeedBuildAll:=false;
|
||||||
NeedBuild:=PackageGraph.CheckIfPackageNeedsCompilation(
|
NeedBuild:=PackageGraph.CheckIfPackageNeedsCompilation(
|
||||||
Pkg,SkipDesignTimePackages,true,NeedBuildAll,Item.Note);
|
Pkg,SkipDesignTimePackages,true,NeedBuildAll,Item.Note);
|
||||||
if NeedBuild=mrYes then begin
|
if NeedBuild=mrYes then begin
|
||||||
|
@ -3652,7 +3652,7 @@ var
|
|||||||
begin
|
begin
|
||||||
Result:=mrYes;
|
Result:=mrYes;
|
||||||
{$IFDEF VerbosePkgCompile}
|
{$IFDEF VerbosePkgCompile}
|
||||||
debugln('TLazPackageGraph.CheckIfPackageNeedsCompilation A ',APackage.IDAsString);
|
debugln(['TLazPackageGraph.CheckIfPackageNeedsCompilation A ',APackage.IDAsString,' NeedBuildAllFlag=',NeedBuildAllFlag]);
|
||||||
{$ENDIF}
|
{$ENDIF}
|
||||||
ForceBuild:=NeedBuildAllFlag;
|
ForceBuild:=NeedBuildAllFlag;
|
||||||
if ForceBuild then begin
|
if ForceBuild then begin
|
||||||
|
Loading…
Reference in New Issue
Block a user