old/unused types removed from Pascal sources

git-svn-id: http://svn.miranda-ng.org/main/trunk@8267 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c

1 files changed, 3 insertions, 3 deletions

diff --git a/plugins/QuickSearch/i_ok.inc b/plugins/QuickSearch/i_ok.inc
index 40708b8901..cb4b161694 100644
--- a/plugins/QuickSearch/i_ok.inc
+++ b/plugins/QuickSearch/i_ok.inc
@@ -209,7 +209,7 @@ begin
 

 end;

 

-function DoMeta(hContact:HCONTACT):pointer;

+function DoMeta(hContact:MCONTACT):pointer;

 var

   pw:pWideChar;

   i:integer;

@@ -433,7 +433,7 @@ end;
 

 //----- Initial table filling -----

 

-procedure AddContact(num:integer;hContact:HCONTACT);

+procedure AddContact(num:integer;hContact:MCONTACT);

 var

   col:pcolumnitem;

   tmpstr:array [0..63] of AnsiChar;

@@ -476,7 +476,7 @@ end;
 function PrepareToFill:boolean;

 var

   cnt,cnt1:integer;

-  hContact:THCONTACT;

+  hContact:MCONTACT;

   i:integer;

 begin

   result:=false;