diff options
Diffstat (limited to 'plugins/Actman/iac_inout.pas')
-rw-r--r-- | plugins/Actman/iac_inout.pas | 9 |
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);
|