From 70d6e746cdd951642731003d13e25e01fa7c210c Mon Sep 17 00:00:00 2001 From: juha Date: Tue, 7 Apr 2020 21:42:43 +0000 Subject: [PATCH] Packager: For a newly created component add a package dependency only when needed. Issue #36876. git-svn-id: trunk@62910 - --- packager/addtopackagedlg.pas | 12 +++++------- 1 file changed, 5 insertions(+), 7 deletions(-) diff --git a/packager/addtopackagedlg.pas b/packager/addtopackagedlg.pas index 11f6a78bb5..ebe3d9657b 100644 --- a/packager/addtopackagedlg.pas +++ b/packager/addtopackagedlg.pas @@ -520,14 +520,12 @@ begin ARequiredPackage:=PkgComponent.PkgFile.LazPackage; ARequiredPackage:=TLazPackage(PackageEditingInterface.RedirectPackageDependency(ARequiredPackage)); NewDependency:=TPkgDependency.Create; - try - NewDependency.DependencyType:=pdtLazarus; - NewDependency.PackageName:=ARequiredPackage.Name; - if CheckAddingPackageDependency(LazPackage,NewDependency,false,false)=mrOK then - PackageGraph.AddDependencyToPackage(LazPackage, NewDependency); - finally + NewDependency.DependencyType:=pdtLazarus; + NewDependency.PackageName:=ARequiredPackage.Name; + if CheckAddingPackageDependency(LazPackage,NewDependency,false,false)=mrOK then + PackageGraph.AddDependencyToPackage(LazPackage, NewDependency) + else NewDependency.Free; - end; end; ModalResult:=mrOk; end;