我正在尝试为ejabberd 17.01编写模块。它一直在ejabberd 16.08上工作。jabbered 17.01离线消息挂钩给出错误
我使用软件包安装程序安装了ejabberd。
-module(mod_imran_offline).
-author('igggg').
-behaviour(gen_mod).
%% Required by ?INFO_MSG macros
-include("logger.hrl").
-export([start/2, stop/1,on_offline/4]).
start(_Host, _Opts) ->
?INFO_MSG("Hello, ejabberd world!", []),
ejabberd_hooks:add(offline_message_hook, _Host, ?MODULE, on_offline, 10),
ok.
stop(_Host) ->
?INFO_MSG("Bye bye, ejabberd world!", []),
ejabberd_hooks:delete(offline_message_hook, _Host, ?MODULE, on_offline, 10),
ok.
on_offline(_User, _Server, _Resource, _Packet) ->
?INFO_MSG("Posting From ~p Body ~p~n",[_User, _Packet]),
none.
我收到以下错误日志
================================ ====
2017年2月9日05：36：45.825 [错误] < 0.660.0> @ejabberd_hooks：RUN1：332 {是undef，[{mod_offline_test，on_offline，[{JID，< <“从 - JID“>>，< <”MY-SERVER-NAME“>>，< <”RESOURCE“>>，< <”FROM-JID“>>，< <”MY-SERVER-NAM E “>>，< < ”资源“ >>}，{JID，< < ”TO-JID“ >>，< < ”MY-SERVER-NAME“ >>，< < >>，< <” TO-JID “>>，< < “MY-SERVER-NAME” >>，< < >>}，{消息，< < “B094705E-3F0B-4AA2-9630-C5A6DEEE7033” >>，聊天，< < >> {JID ，< < “FROM-JID” >>，< < “MY-SERVER-NAME” >>，< < “资源” >>，< < “FROM-JID” >>，< < “MY-SERVER-NAME” >>，< < “资源” >>}，{JID，< < “TO-JID” >>，< < “MY-SERVER-NAME” >>，< < >>，< < “TO-JID” >>，< < “MY-SERVER-NAME”>>，< < >>}，[]，[{text，< < >>，< <“Rrrrrrr”>>}]，undefined，[]，＃{}}]，[] ]}，{ejabberd_hooks，safe_apply，3，[{文件， “SRC/ejabberd_hooks.erl”}，{线，382}]}，{ejabberd_hooks，run1,3，[{文件， “SRC/ejabberd_hooks.erl”} {线，329}]}，{ejabberd_sm，路线，3，[{文件， “SRC/ejabberd_sm.erl”}，{线，126}]}，{ejabberd_local，路线，3，[{文件，“SRC /ejabberd_local.erl"},{line,110}]},{ejabberd_router,route,3,[{file,"src/ejabberd_router.erl"},{line,87}]},{ejabberd_c2s,check_privacy_route,5， [{文件， “SRC/ejabberd_c2s.erl” }，{线，1886}]}，{ejabberd_c2s，session_established2,2，[{文件，“SRC/ejabberd_c2s。我的服务器名称>>，< <“RESOURCE “>>，< < “FROM-JID” >>，< < “MY-SERVER-NAME” >>，< < “资源” >>}，{JID，< < “TO-JID” >>，< < “MY-SERVER-NAME” >>，< < >>，< < “TO-JID” >>，< < “MY-SERVER-NAME” >>，< < >>}，{消息，< <“B094705E -3F0B-4AA2-9630-C5A6DEEE7033" >>，CH在，< < >> {JID，< < “FROM-JID” >>，< < “MY-SERVER-NAME” >>，< < “资源” >>，< < “FROM-JID” >>， < < “MY-SERVER-NAME” >>，< < “资源” >>}，{JID，< < “TO-JID” >>，< < “MY-SERVER-NAME” >>，< < >> ，< < “TO-JID” >>，< < “MY-SERVER-NAME” >>，< < >>}，[]，[{文本，< < >>，< < “RRRRRRR” >>}] ，理解过程罚款，[]，＃{}}]}
=================================== =