From e210c73735eee619ccd48337f46bef90bcde3844 Mon Sep 17 00:00:00 2001
From: Juha <juha@lazarus-ide.org>
Date: Mon, 17 Jan 2022 14:44:01 +0200
Subject: [PATCH] IdeIntf: Collect procedures
 TLazIDEInterface.DoCallNotifyHandler together.

---
 components/ideintf/lazideintf.pas | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

diff --git a/components/ideintf/lazideintf.pas b/components/ideintf/lazideintf.pas
index 734337708c..cc169bee5c 100644
--- a/components/ideintf/lazideintf.pas
+++ b/components/ideintf/lazideintf.pas
@@ -298,11 +298,11 @@ type
 
     procedure SetToolStatus(const AToolStatus: TLazToolStatus); virtual;
     function GetActiveProject: TLazProject; virtual; abstract;
-    procedure DoCallNotifyHandler(HandlerType: TLazarusIDEHandlerType); overload;
     function DoCallModalFunctionHandler(HandlerType: TLazarusIDEHandlerType
                                         ): TModalResult;
     function DoCallModalHandledHandler(HandlerType: TLazarusIDEHandlerType;
                                        var Handled: boolean): TModalResult;
+    procedure DoCallNotifyHandler(HandlerType: TLazarusIDEHandlerType); overload;
     procedure DoCallNotifyHandler(HandlerType: TLazarusIDEHandlerType;
                                   Sender: TObject); overload;
     procedure DoCallShowDesignerFormOfSourceHandler(Sender: TObject;
@@ -678,12 +678,6 @@ begin
   end;
 end;
 
-procedure TLazIDEInterface.DoCallNotifyHandler(
-  HandlerType: TLazarusIDEHandlerType);
-begin
-  FLazarusIDEHandlers[HandlerType].CallNotifyEvents(Self);
-end;
-
 function TLazIDEInterface.DoCallModalFunctionHandler(
   HandlerType: TLazarusIDEHandlerType): TModalResult;
 var
@@ -736,7 +730,13 @@ begin
   Result:=mrOk;
 end;
 
-procedure TLazIDEInterface.DoCallNotifyHandler(HandlerType: TLazarusIDEHandlerType; Sender: TObject);
+procedure TLazIDEInterface.DoCallNotifyHandler(HandlerType: TLazarusIDEHandlerType);
+begin
+  FLazarusIDEHandlers[HandlerType].CallNotifyEvents(Self);
+end;
+
+procedure TLazIDEInterface.DoCallNotifyHandler(HandlerType: TLazarusIDEHandlerType;
+  Sender: TObject);
 begin
   FLazarusIDEHandlers[HandlerType].CallNotifyEvents(Sender);
 end;