diff options
| author | Evgeny Khramtsov <ekhramtsov@process-one.net> | 2019-03-14 12:28:37 +0300 |
|---|---|---|
| committer | Evgeny Khramtsov <ekhramtsov@process-one.net> | 2019-03-14 12:28:37 +0300 |
| commit | 7a622c3392544e6e83971babe204fd6113119b59 (patch) | |
| tree | da2f703ebb74e5e84ac1f3a8eb9506e506781a0b /src | |
| parent | Delete the ping timer only when timeout_action=kill (#2820) (diff) | |
Improve formatting of hook crashes
Diffstat (limited to 'src')
| -rw-r--r-- | src/ejabberd_hooks.erl | 11 |
1 files changed, 7 insertions, 4 deletions
diff --git a/src/ejabberd_hooks.erl b/src/ejabberd_hooks.erl index 28d994c4a..bbd2050a3 100644 --- a/src/ejabberd_hooks.erl +++ b/src/ejabberd_hooks.erl @@ -381,10 +381,13 @@ safe_apply(Hook, Module, Function, Args) -> apply(Module, Function, Args) end catch ?EX_RULE(E, R, St) when E /= exit; R /= normal -> - ?ERROR_MSG("Hook ~p crashed when running ~p:~p/~p:~n" - "** Reason = ~p~n" - "** Arguments = ~p", + ?ERROR_MSG("Hook ~p crashed when running ~p:~p/~p:~n" ++ + string:join( + ["** Reason = ~p"| + ["** Arg " ++ integer_to_list(I) ++ " = ~p" + || I <- lists:seq(1, length(Args))]], + "~n"), [Hook, Module, Function, length(Args), - {E, R, ?EX_STACK(St)}, Args]), + {E, R, ?EX_STACK(St)}|Args]), 'EXIT' end. |