summaryrefslogtreecommitdiff
path: root/plugins/Actman/iac_inout.pas
diff options
context:
space:
mode:
Diffstat (limited to 'plugins/Actman/iac_inout.pas')
-rw-r--r--plugins/Actman/iac_inout.pas9
1 files changed, 8 insertions, 1 deletions
diff --git a/plugins/Actman/iac_inout.pas b/plugins/Actman/iac_inout.pas
index b5fcbb466a..0626de08f2 100644
--- a/plugins/Actman/iac_inout.pas
+++ b/plugins/Actman/iac_inout.pas
@@ -88,6 +88,7 @@ var
tmp:PWideChar;
blob,p:PAnsiChar;
w:PWideChar;
+ ccs:TCCSDATA;
hContact:TMCONTACT;
wnd:HWND;
fexist:bool;
@@ -272,7 +273,13 @@ begin
if DBReadByte(hContact,p,'ChatRoom',0)<>1 then
begin
WidetoUTF8(last,blob);
- CallContactService(hContact,PSS_MESSAGE,0,tlparam(blob));
+
+ ccs.hContact := hContact;
+ ccs.szProtoService := PSS_MESSAGE;
+ ccs.wParam := 0;
+ ccs.lParam := tlparam(blob);
+ Proto_ChainSend(0, @ccs);
+
dbei.cbSize :=sizeof(dbei);
dbei.cbBlob :=StrLen(blob);
dbei.pBlob :=pByte(blob);