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

IDE: removed obsolete custom components

Browse Source 
git-svn-id: trunk@56783 -
This commit is contained in:
mattias 2017-12-18 19:54:32 +00:00
parent ecaababe22
commit 20638d46c7
3 changed files with 1 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
ide/main.pp
View File

@ -3287,7 +3287,6 @@ begin
ecViewProjectUnits: DoViewUnitsAndForms(false); ecViewProjectUnits: DoViewUnitsAndForms(false);
ecViewProjectForms: DoViewUnitsAndForms(true); ecViewProjectForms: DoViewUnitsAndForms(true);
ecProjectInspector: DoShowProjectInspector; ecProjectInspector: DoShowProjectInspector;
ecConfigCustomComps: PkgBoss.ShowConfigureCustomComponents;
ecExtToolFirst..ecExtToolLast: DoRunExternalTool(Command-ecExtToolFirst,false); ecExtToolFirst..ecExtToolLast: DoRunExternalTool(Command-ecExtToolFirst,false);
ecSyntaxCheck: DoCheckSyntax; ecSyntaxCheck: DoCheckSyntax;
ecGuessUnclosedBlock: DoJumpToGuessedUnclosedBlock(true); ecGuessUnclosedBlock: DoJumpToGuessedUnclosedBlock(true);

1
packager/basepkgmanager.pas
View File

@ -134,7 +134,6 @@ type
// package installation // package installation
procedure LoadInstalledPackages; virtual; abstract; procedure LoadInstalledPackages; virtual; abstract;
function DoShowLoadedPkgDlg: TModalResult; virtual; abstract; function DoShowLoadedPkgDlg: TModalResult; virtual; abstract;
function ShowConfigureCustomComponents: TModalResult; virtual; abstract;
function DoCompileAutoInstallPackages(Flags: TPkgCompileFlags; function DoCompileAutoInstallPackages(Flags: TPkgCompileFlags;
OnlyBase: boolean): TModalResult; virtual; abstract; OnlyBase: boolean): TModalResult; virtual; abstract;
function DoSaveAutoInstallConfig: TModalResult; virtual; abstract; function DoSaveAutoInstallConfig: TModalResult; virtual; abstract;

14
packager/pkgmanager.pas
View File

@ -62,7 +62,7 @@ uses
// IDE // IDE
PkgRegisterBase, IDECmdLine, LazarusIDEStrConsts, IDEProcs, ObjectLists, PkgRegisterBase, IDECmdLine, LazarusIDEStrConsts, IDEProcs, ObjectLists,
DialogProcs, IDECommands, IDEOptionDefs, EnvironmentOpts, MiscOptions, DialogProcs, IDECommands, IDEOptionDefs, EnvironmentOpts, MiscOptions,
InputHistory, Project, OldCustomCompDlg, PackageEditor, AddToPackageDlg, InputHistory, Project, PackageEditor, AddToPackageDlg,
PackageDefs, PackageLinks, PackageSystem, OpenInstalledPkgDlg, PackageDefs, PackageLinks, PackageSystem, OpenInstalledPkgDlg,
PkgGraphExplorer, BrokenDependenciesDlg, CompilerOptions, PkgGraphExplorer, BrokenDependenciesDlg, CompilerOptions,
IDETranslations, TransferMacros, BuildLazDialog, NewDialog, FindInFilesDlg, IDETranslations, TransferMacros, BuildLazDialog, NewDialog, FindInFilesDlg,
@ -145,7 +145,6 @@ type
procedure MainIDEitmPkgAddCurFileToPkgClick(Sender: TObject); procedure MainIDEitmPkgAddCurFileToPkgClick(Sender: TObject);
procedure MainIDEitmPkgNewComponentClick(Sender: TObject); procedure MainIDEitmPkgNewComponentClick(Sender: TObject);
procedure MainIDEitmPkgOpenPackageOfCurUnitClicked(Sender: TObject); procedure MainIDEitmPkgOpenPackageOfCurUnitClicked(Sender: TObject);
procedure MainIDEitmConfigCustomCompsClicked(Sender: TObject);
procedure MainIDEitmOpenRecentPackageClicked(Sender: TObject); procedure MainIDEitmOpenRecentPackageClicked(Sender: TObject);
procedure MainIDEitmPkgOpenLoadedPackageClicked(Sender: TObject); procedure MainIDEitmPkgOpenLoadedPackageClicked(Sender: TObject);
procedure MainIDEitmPkgNewPackageClick(Sender: TObject); procedure MainIDEitmPkgNewPackageClick(Sender: TObject);
@ -332,7 +331,6 @@ type
// package installation // package installation
procedure LoadInstalledPackages; override; procedure LoadInstalledPackages; override;
procedure UnloadInstalledPackages; procedure UnloadInstalledPackages;
function ShowConfigureCustomComponents: TModalResult; override;
function DoInstallPackage(APackage: TLazPackage): TModalResult; function DoInstallPackage(APackage: TLazPackage): TModalResult;
function DoUninstallPackage(APackage: TLazPackage; function DoUninstallPackage(APackage: TLazPackage;
Flags: TPkgUninstallFlags; ShowAbort: boolean): TModalResult; Flags: TPkgUninstallFlags; ShowAbort: boolean): TModalResult;
@ -1036,11 +1034,6 @@ begin
Result:=DoUninstallPackage(APackage,[],false); Result:=DoUninstallPackage(APackage,[],false);
end; end;
procedure TPkgManager.MainIDEitmConfigCustomCompsClicked(Sender: TObject);
begin
ShowConfigureCustomComponents;
end;
procedure TPkgManager.MainIDEitmPkgNewPackageClick(Sender: TObject); procedure TPkgManager.MainIDEitmPkgNewPackageClick(Sender: TObject);
begin begin
DoNewPackage; DoNewPackage;
@ -3509,11 +3502,6 @@ begin
end; end;
end; end;
function TPkgManager.ShowConfigureCustomComponents: TModalResult;
begin
Result:=ShowConfigureCustomComponentDlg(EnvironmentOptions.GetParsedLazarusDirectory);
end;
function TPkgManager.DoNewPackage: TModalResult; function TPkgManager.DoNewPackage: TModalResult;
var var
NewPackage: TLazPackage; NewPackage: TLazPackage;