From 34353afa23f23d9bc3470896248b8c387465a4b2 Mon Sep 17 00:00:00 2001
From: Alexey Kulakov <panda75@bk.ru>
Date: Mon, 10 Feb 2014 17:25:36 +0000
Subject: Miranda API sync with small compilation fixes

git-svn-id: http://svn.miranda-ng.org/main/trunk@8083 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
---
 include/delphi/m_popup.inc | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'include/delphi/m_popup.inc')

diff --git a/include/delphi/m_popup.inc b/include/delphi/m_popup.inc
index 77c5d481dd..804140f6d6 100644
--- a/include/delphi/m_popup.inc
+++ b/include/delphi/m_popup.inc
@@ -56,7 +56,7 @@ type
 type
   PPOPUPDATA = ^TPOPUPDATA;
   TPOPUPDATA = record
-    lchContact      : THANDLE;
+    lchContact      : HCONTACT;
     lchIcon         : HICON;
     lpszContactName : array [0..MAX_CONTACTNAME-1] of AnsiChar;
     lpszText        : array [0..MAX_SECONDLINE -1] of AnsiChar;
@@ -81,7 +81,7 @@ type
 type
   PPOPUPDATAW = ^TPOPUPDATAW;
   TPOPUPDATAW = record
-    lchContact      : THANDLE;
+    lchContact      : HCONTACT;
     lchIcon         : HICON;
     lpwzContactName : array [0..MAX_CONTACTNAME-1] of WideChar;
     lpwzText        : array [0..MAX_SECONDLINE -1] of WideChar;
@@ -344,7 +344,7 @@ const
 
 // wParam = 0
 // lParam = (POPUPCLASS *)&pc
-  MS_POPUP_REGISTERCLASS = 'Popup/RegisterClass';
+  MS_POPUP_REGISTERCLASS   = 'Popup/RegisterClass';
   MS_POPUP_UNREGISTERCLASS = 'Popup/UnregisterClass';
 
 type
@@ -354,7 +354,7 @@ type
 		szTitle     :TChar;
 		szText      :TChar;
 	  PluginData  :pointer;
-	  hContact    :THANDLE;
+	  hContact    :HCONTACT;
   end;
   POPUPDATACLASS = TPOPUPDATACLASS;
 
-- 
cgit v1.2.3