From 20638d46c77d5a320f279bb3884de98ed72cd044 Mon Sep 17 00:00:00 2001 From: mattias Date: Mon, 18 Dec 2017 19:54:32 +0000 Subject: [PATCH] IDE: removed obsolete custom components git-svn-id: trunk@56783 - --- ide/main.pp | 1 - packager/basepkgmanager.pas | 1 - packager/pkgmanager.pas | 14 +------------- 3 files changed, 1 insertion(+), 15 deletions(-) diff --git a/ide/main.pp b/ide/main.pp index 5afb319375..50f6b36d80 100644 --- a/ide/main.pp +++ b/ide/main.pp @@ -3287,7 +3287,6 @@ begin ecViewProjectUnits: DoViewUnitsAndForms(false); ecViewProjectForms: DoViewUnitsAndForms(true); ecProjectInspector: DoShowProjectInspector; - ecConfigCustomComps: PkgBoss.ShowConfigureCustomComponents; ecExtToolFirst..ecExtToolLast: DoRunExternalTool(Command-ecExtToolFirst,false); ecSyntaxCheck: DoCheckSyntax; ecGuessUnclosedBlock: DoJumpToGuessedUnclosedBlock(true); diff --git a/packager/basepkgmanager.pas b/packager/basepkgmanager.pas index 64ba8bb231..644791b3df 100644 --- a/packager/basepkgmanager.pas +++ b/packager/basepkgmanager.pas @@ -134,7 +134,6 @@ type // package installation procedure LoadInstalledPackages; virtual; abstract; function DoShowLoadedPkgDlg: TModalResult; virtual; abstract; - function ShowConfigureCustomComponents: TModalResult; virtual; abstract; function DoCompileAutoInstallPackages(Flags: TPkgCompileFlags; OnlyBase: boolean): TModalResult; virtual; abstract; function DoSaveAutoInstallConfig: TModalResult; virtual; abstract; diff --git a/packager/pkgmanager.pas b/packager/pkgmanager.pas index 65dbb9df75..308e2e08d1 100644 --- a/packager/pkgmanager.pas +++ b/packager/pkgmanager.pas @@ -62,7 +62,7 @@ uses // IDE PkgRegisterBase, IDECmdLine, LazarusIDEStrConsts, IDEProcs, ObjectLists, DialogProcs, IDECommands, IDEOptionDefs, EnvironmentOpts, MiscOptions, - InputHistory, Project, OldCustomCompDlg, PackageEditor, AddToPackageDlg, + InputHistory, Project, PackageEditor, AddToPackageDlg, PackageDefs, PackageLinks, PackageSystem, OpenInstalledPkgDlg, PkgGraphExplorer, BrokenDependenciesDlg, CompilerOptions, IDETranslations, TransferMacros, BuildLazDialog, NewDialog, FindInFilesDlg, @@ -145,7 +145,6 @@ type procedure MainIDEitmPkgAddCurFileToPkgClick(Sender: TObject); procedure MainIDEitmPkgNewComponentClick(Sender: TObject); procedure MainIDEitmPkgOpenPackageOfCurUnitClicked(Sender: TObject); - procedure MainIDEitmConfigCustomCompsClicked(Sender: TObject); procedure MainIDEitmOpenRecentPackageClicked(Sender: TObject); procedure MainIDEitmPkgOpenLoadedPackageClicked(Sender: TObject); procedure MainIDEitmPkgNewPackageClick(Sender: TObject); @@ -332,7 +331,6 @@ type // package installation procedure LoadInstalledPackages; override; procedure UnloadInstalledPackages; - function ShowConfigureCustomComponents: TModalResult; override; function DoInstallPackage(APackage: TLazPackage): TModalResult; function DoUninstallPackage(APackage: TLazPackage; Flags: TPkgUninstallFlags; ShowAbort: boolean): TModalResult; @@ -1036,11 +1034,6 @@ begin Result:=DoUninstallPackage(APackage,[],false); end; -procedure TPkgManager.MainIDEitmConfigCustomCompsClicked(Sender: TObject); -begin - ShowConfigureCustomComponents; -end; - procedure TPkgManager.MainIDEitmPkgNewPackageClick(Sender: TObject); begin DoNewPackage; @@ -3509,11 +3502,6 @@ begin end; end; -function TPkgManager.ShowConfigureCustomComponents: TModalResult; -begin - Result:=ShowConfigureCustomComponentDlg(EnvironmentOptions.GetParsedLazarusDirectory); -end; - function TPkgManager.DoNewPackage: TModalResult; var NewPackage: TLazPackage;