From 3c4823facbeb52a8f539ea2cf04568c9e8cd4980 Mon Sep 17 00:00:00 2001
From: Jay Doane <jay.s.doane@gmail.com>
Date: Thu, 17 Mar 2016 00:38:10 -0700
Subject: [PATCH] Get lager event handlers from gen_event

The existing mechanism for getting lager_event's handlers incorrectly
uses the data structure returned by application:get_env, which is a
configuration defined in sys.config. The actual lager_event handler
list is obtained directly from gen_event.

COUCHDB-2970
---
 src/couch_log_lager.erl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/couch_log_lager.erl b/src/couch_log_lager.erl
index 504d359..56d4fcd 100644
--- a/src/couch_log_lager.erl
+++ b/src/couch_log_lager.erl
@@ -64,9 +64,9 @@ emergency(Fmt, Args) ->
 
 -spec set_level(atom()) -> ok.
 set_level(Level) ->
-    {ok, Handlers} = application:get_env(lager, handlers),
-    lists:foreach(fun({Handler, _}) ->
-        lager:set_loglevel(Handler, Level)
+    Handlers = gen_event:which_handlers(lager_event),
+    lists:foreach(fun(Handler) ->
+        ok = lager:set_loglevel(Handler, Level)
     end, Handlers).