diff --git a/packager/basepkgmanager.pas b/packager/basepkgmanager.pas index 891d2a8410..2024901cec 100644 --- a/packager/basepkgmanager.pas +++ b/packager/basepkgmanager.pas @@ -46,7 +46,7 @@ uses TypInfo, Classes, SysUtils, Forms, LazFileUtils, LCLProc, ComCtrls, LazIDEIntf, PackageIntf, MenuIntf, LazarusIDEStrConsts, EnvironmentOpts, - CompilerOptions, PackageDefs, PackageSystem, ComponentReg, Project; + CompilerOptions, PackageDefs, PackageSystem, Project; type { TBasePkgManager } @@ -87,8 +87,6 @@ type OnlyTestIfPossible: boolean = false): TModalResult; virtual; abstract; function AddProjectDependency(AProject: TProject; ADependency: TPkgDependency): TModalResult; virtual; abstract; - procedure AddProjectRegCompDependency(AProject: TProject; - ARegisteredComponent: TRegisteredComponent); virtual; abstract; function AddProjectDependencies(AProject: TProject; const Packages: string; OnlyTestIfPossible: boolean = false): TModalResult; virtual; abstract; function CheckProjectHasInstalledPackages(AProject: TProject; Interactive: boolean): TModalResult; virtual; abstract; diff --git a/packager/pkgmanager.pas b/packager/pkgmanager.pas index 4b5c3c8285..2aa8272048 100644 --- a/packager/pkgmanager.pas +++ b/packager/pkgmanager.pas @@ -275,8 +275,6 @@ type OnlyTestIfPossible: boolean = false): TModalResult; override; function AddProjectDependency(AProject: TProject; ADependency: TPkgDependency): TModalResult; override; - procedure AddProjectRegCompDependency(AProject: TProject; - ARegisteredComponent: TRegisteredComponent); override; function AddProjectDependencies(AProject: TProject; const Packages: string; OnlyTestIfPossible: boolean = false): TModalResult; override; function OnProjectInspectorAddDependency(Sender: TObject; @@ -3378,23 +3376,6 @@ begin end; end; -procedure TPkgManager.AddProjectRegCompDependency(AProject: TProject; - ARegisteredComponent: TRegisteredComponent); -var - PkgFile: TPkgFile; - APackage: TLazPackage; -begin - if not (ARegisteredComponent is TPkgComponent) then exit; - - PkgFile:=TPkgComponent(ARegisteredComponent).PkgFile; - if (PkgFile=nil) then exit; - - APackage:=PkgFile.LazPackage; - APackage:=TLazPackage(RedirectPackageDependency(APackage)); - - AddProjectDependency(AProject,APackage); -end; - function TPkgManager.AddProjectDependencies(AProject: TProject; const Packages: string; OnlyTestIfPossible: boolean): TModalResult; var