Accept either mfa or mfargs in supervisor report
Project: http://git-wip-us.apache.org/repos/asf/couchdb-twig/repo Commit: http://git-wip-us.apache.org/repos/asf/couchdb-twig/commit/54931455 Tree: http://git-wip-us.apache.org/repos/asf/couchdb-twig/tree/54931455 Diff: http://git-wip-us.apache.org/repos/asf/couchdb-twig/diff/54931455 Branch: refs/heads/import Commit: 5493145599225b7ce78a3d2b3d3906200d931218 Parents: cdb23a6 Author: Adam Kocoloski <[email protected]> Authored: Tue Mar 8 14:08:28 2011 -0500 Committer: Adam Kocoloski <[email protected]> Committed: Tue Mar 8 14:08:28 2011 -0500 ---------------------------------------------------------------------- src/twig_event_handler.erl | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) ---------------------------------------------------------------------- http://git-wip-us.apache.org/repos/asf/couchdb-twig/blob/54931455/src/twig_event_handler.erl ---------------------------------------------------------------------- diff --git a/src/twig_event_handler.erl b/src/twig_event_handler.erl index b8ca64f..6065991 100644 --- a/src/twig_event_handler.erl +++ b/src/twig_event_handler.erl @@ -123,7 +123,12 @@ message(Pid, supervisor_report, Report) -> Offender = get_value(offender, Report), ChildPid = get_value(pid, Offender), ChildName = get_value(name, Offender), - {M,F,_} = get_value(mfa, Offender), + case get_value(mfa, Offender) of + undefined -> + {M,F,_} = get_value(mfargs, Offender); + {M,F,_} -> + ok + end, {"[~p] SUPERVISOR REPORT ~p ~p (~p) child: ~p [~p] ~p:~p", [Pid, Name, Error, Reason, ChildName, ChildPid, M, F]}; message(Pid, progress_report, Report) ->
