From 66b61f42871089f3962920924f9030cd6dff2ad8 Mon Sep 17 00:00:00 2001
From: George Hazan <ghazan@miranda.im>
Date: Tue, 3 Apr 2018 13:37:13 +0300
Subject: CLIST_INTERFACE:

- unused members removed (requires new History++ for people who compile Miranda themselves);
- useless helpers Proto_IsAccountEnabled & Proto_IsProtocolLocked replaced with direct calls of PROTOACCOUNT members IsEnabled & IsLocked respectively;
- static interface member pfnGetProtocolVisibility replaced with static function Clist_GetProtocolVisibility or PROTOACCOUNT::IsVisible when possible
---
 include/delphi/m_clistint.inc  | 11 +----------
 include/delphi/m_protocols.inc | 16 ----------------
 2 files changed, 1 insertion(+), 26 deletions(-)

(limited to 'include/delphi')

diff --git a/include/delphi/m_clistint.inc b/include/delphi/m_clistint.inc
index 1c04a491cb..699b138f4f 100644
--- a/include/delphi/m_clistint.inc
+++ b/include/delphi/m_clistint.inc
@@ -298,7 +298,6 @@ type
 
   (* clc.h *)
     pfnClcOptionsChanged   : procedure; cdecl;
-    unused3                : procedure; cdecl;
     pfnBuildGroupPopupMenu : function  (_para1:PClcGroup):HMENU; cdecl;
 
     pfnContactListControlWndProc:function(hwnd:HWND; msg:uint; wParam:WPARAM; lParam:LPARAM):LRESULT; stdcall;
@@ -423,11 +422,6 @@ type
   (* docking.c *)
     pfnDocking_ProcessWindowMessage : function (wParam:WPARAM; lParam:LPARAM):int; cdecl;
 
-    blablabla1 : procedure; cdecl;
-    blablabla2 : procedure; cdecl;
-    blablabla3 : procedure; cdecl;
-    blablabla4 : procedure; cdecl;
-
   (*************************************************************************************
   * version 2 - events processing
   *************************************************************************************)
@@ -459,10 +453,7 @@ type
     bDisplayLocked           : bool;
     bAutoRebuild             : bool;
 
-    pfnGetProtocolMenu : function (_para1:PAnsiChar):HGENMENU; cdecl;
-    pfnStub2           : function (_para1:int):int; cdecl;
-
-    pfnGetProtocolVisibility : function (_para1:PAnsiChar):int; cdecl;
+    pfnGetProtocolMenu       : function (_para1:PAnsiChar):HGENMENU; cdecl;
     pfnGetProtoIndexByPos    : function (var proto:PPROTOCOLDESCRIPTOR; protoCnt:int; Pos:int):int; cdecl;
     pfnReloadProtoMenus      : procedure ; cdecl;
 
diff --git a/include/delphi/m_protocols.inc b/include/delphi/m_protocols.inc
index 83deebaf44..c4038e9600 100644
--- a/include/delphi/m_protocols.inc
+++ b/include/delphi/m_protocols.inc
@@ -311,22 +311,6 @@ const
 }
   MS_PROTO_SHOWACCMGR:PAnsiChar = 'Protos/ShowAccountManager';
 
-{
-  determines if an account is enabled or not
-  Returns 1 if an account is valid and enabled, 0 otherwise
-}
-
-function Proto_IsAccountEnabled(proto:PPROTOACCOUNT) : byte; stdcall; external AppDLL;
-
-{
-  determines if an account is locked or not
-  wParam = 0
-  lParam = PAnsiChar szAccountName
-  Returns 1 if an account is locked and not supposed to change status, 0 otherwise
-}
-
-function Proto_IsAccountLocked(proto:PPROTOACCOUNT) : byte; stdcall; external AppDLL;
-
 {
   gets the account associated with a contact
   Returns a PAnsiChar pointing to the asciiz name of the protocol or NULL if the
-- 
cgit v1.2.3