summaryrefslogtreecommitdiff
path: root/plugins/ImportTXT/General.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/ImportTXT/General.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/ImportTXT/General.pas')
-rw-r--r--plugins/ImportTXT/General.pas2
1 files changed, 1 insertions, 1 deletions
diff --git a/plugins/ImportTXT/General.pas b/plugins/ImportTXT/General.pas
index 637a394e18..709f6c27f6 100644
--- a/plugins/ImportTXT/General.pas
+++ b/plugins/ImportTXT/General.pas
@@ -373,7 +373,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;