@@ -23,17 +23,17 @@ stop (_Host) ->
23
23
24
24
create_message ({Action , Packet } = Acc ) when (Packet # message .type == chat ) and (Packet # message .body /= []) ->
25
25
[{text , _ , Body }] = Packet # message .body ,
26
- post_offline_message (Packet # message .from , Packet # message .to , Body , " SubType " , Packet # message .id ),
26
+ post_offline_message (Packet # message .from , Packet # message .to , Body , Packet # message .id ),
27
27
Acc .
28
28
29
29
create_message (_From , _To , Packet ) when (Packet # message .type == chat ) and (Packet # message .body /= []) ->
30
30
Body = fxml :get_path_s (Packet , [{elem , list_to_binary (" body" )}, cdata ]),
31
31
MessageId = fxml :get_tag_attr_s (list_to_binary (" id" ), Packet ),
32
- post_offline_message (_From , _To , Body , " SubType " , MessageId ),
32
+ post_offline_message (_From , _To , Body , MessageId ),
33
33
ok .
34
34
35
- post_offline_message (From , To , Body , SubType , MessageId ) ->
36
- ? INFO_MSG (" Posting From ~p To ~p Body ~p SubType ~p ID ~p~n " ,[From , To , Body , SubType , MessageId ]),
35
+ post_offline_message (From , To , Body , MessageId ) ->
36
+ ? INFO_MSG (" Posting From ~p To ~p Body ~p ID ~p~n " ,[From , To , Body , MessageId ]),
37
37
Token = gen_mod :get_module_opt (To # jid .lserver , ? MODULE , auth_token , fun (S ) -> iolist_to_binary (S ) end , list_to_binary (" " )),
38
38
PostUrl = gen_mod :get_module_opt (To # jid .lserver , ? MODULE , post_url , fun (S ) -> iolist_to_binary (S ) end , list_to_binary (" " )),
39
39
ToUser = To # jid .luser ,
0 commit comments