summaryrefslogtreecommitdiff
path: root/plugins/HistoryPlusPlus/hpp_contacts.pas
diff options
context:
space:
mode:
authorGeorge Hazan <george.hazan@gmail.com>2013-02-27 12:19:08 +0000
committerGeorge Hazan <george.hazan@gmail.com>2013-02-27 12:19:08 +0000
commitc0c16a96a67312c05c1e836b885fc3ae6671f1a2 (patch)
tree5fbc2a710e91ba03c2da0d6ffe61066bdc211c09 /plugins/HistoryPlusPlus/hpp_contacts.pas
parent873c6cdd0f7155926f3b8b5fa5db9bf9929c303b (diff)
another attempt to fix problems with FPC & CALLSERVICE_NOTFOUND
git-svn-id: http://svn.miranda-ng.org/main/trunk@3793 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
Diffstat (limited to 'plugins/HistoryPlusPlus/hpp_contacts.pas')
-rw-r--r--plugins/HistoryPlusPlus/hpp_contacts.pas2
1 files changed, 1 insertions, 1 deletions
diff --git a/plugins/HistoryPlusPlus/hpp_contacts.pas b/plugins/HistoryPlusPlus/hpp_contacts.pas
index 288c083123..b78c4db72e 100644
--- a/plugins/HistoryPlusPlus/hpp_contacts.pas
+++ b/plugins/HistoryPlusPlus/hpp_contacts.pas
@@ -135,7 +135,7 @@ begin
if Proto = '' then
Proto := GetContactProto(hContact);
uid := PAnsiChar(CallProtoService(PAnsiChar(Proto), PS_GETCAPS, PFLAG_UNIQUEIDSETTING, 0));
- if (uint_ptr(uid) <> CALLSERVICE_NOTFOUND) and (uid <> nil) then
+ if (uid <> pAnsiChar(CALLSERVICE_NOTFOUND)) and (uid <> nil) then
begin
cgs.szModule := PAnsiChar(Proto);
cgs.szSetting := uid;