Fix bad invocation of lists:keyfind/3

Project: http://git-wip-us.apache.org/repos/asf/couchdb-twig/repo
Commit: http://git-wip-us.apache.org/repos/asf/couchdb-twig/commit/4498ce33
Tree: http://git-wip-us.apache.org/repos/asf/couchdb-twig/tree/4498ce33
Diff: http://git-wip-us.apache.org/repos/asf/couchdb-twig/diff/4498ce33

Branch: refs/heads/import
Commit: 4498ce33205e8270acb2f23364756eb5a88f20e1
Parents: 4652cd8
Author: Adam Kocoloski <[email protected]>
Authored: Tue Mar 8 13:29:47 2011 -0500
Committer: Adam Kocoloski <[email protected]>
Committed: Tue Mar 8 13:29:47 2011 -0500

----------------------------------------------------------------------
 src/twig_event_handler.erl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)
----------------------------------------------------------------------


http://git-wip-us.apache.org/repos/asf/couchdb-twig/blob/4498ce33/src/twig_event_handler.erl
----------------------------------------------------------------------
diff --git a/src/twig_event_handler.erl b/src/twig_event_handler.erl
index 874789c..e908452 100644
--- a/src/twig_event_handler.erl
+++ b/src/twig_event_handler.erl
@@ -118,7 +118,7 @@ message(_Pid, crash_report, Report) ->
     proc_lib:format(Report);
 message(Pid, supervisor_report, Report) ->
     Name = lists:keyfind(supervisor, 1, Report),
-    Error = lists:keyfind(errorContext, Report),
+    Error = lists:keyfind(errorContext, 1, Report),
     Reason = lists:keyfind(reason, 1, Report),
     Offender = lists:keyfind(offender, 1, Report),
     ChildPid = lists:keyfind(pid, 1, Offender),

Reply via email to