From c7510d07b7aa96de60b9af2f779bd4ea978569e4 Mon Sep 17 00:00:00 2001
From: juha <juha@lazarus-ide.org>
Date: Wed, 31 Dec 2014 20:36:26 +0000
Subject: [PATCH] IDE: ComponentPalette cleanup. Move MainBase reference from
 implementation to interface.

git-svn-id: trunk@47274 -
---
 ide/componentpalette.pas | 10 +---------
 1 file changed, 1 insertion(+), 9 deletions(-)

diff --git a/ide/componentpalette.pas b/ide/componentpalette.pas
index 83e8968f91..c342053363 100644
--- a/ide/componentpalette.pas
+++ b/ide/componentpalette.pas
@@ -43,7 +43,7 @@ uses
   {$IFDEF CustomIDEComps}
   CustomIDEComps,
   {$ENDIF}
-  LazarusIDEStrConsts, ComponentReg, DesignerProcs, PackageDefs, EnvironmentOpts;
+  MainBase, LazarusIDEStrConsts, ComponentReg, DesignerProcs, PackageDefs, EnvironmentOpts;
 
 const
   CompPalSelectionToolBtnPrefix = 'PaletteSelectBtn';
@@ -156,7 +156,6 @@ type
     function GetSelectButtonIcon: TCustomBitmap;
     function SelectAButton(Button: TComponent): boolean;
   protected
-    procedure DoBeginUpdate; override;
     procedure DoEndUpdate(Changed: boolean); override;
     procedure OnPageAddedComponent(Component: TRegisteredComponent); override;
     procedure OnPageRemovedComponent(Page: TBaseComponentPage;
@@ -198,8 +197,6 @@ implementation
 
 {$R ../images/components_images.res}
 {$DEFINE USE_PageIndex}
-uses
-  MainBase;
 
 const
   OVERVIEW_PANEL_WIDTH = 20;
@@ -884,11 +881,6 @@ begin
   PopupMenu.Items.Add(MenuItem);
 end;
 
-procedure TComponentPalette.DoBeginUpdate;
-begin
-  inherited DoBeginUpdate;
-end;
-
 procedure TComponentPalette.DoEndUpdate(Changed: boolean);
 begin
   if Changed or fNoteBookNeedsUpdate then begin