Disable SASL error logger if lager is enabled

diff --git a/src/ejabberd_logger.erl b/src/ejabberd_logger.erl
index e1883f1db2d6ef1809a7fcb2788db8ed2645c7fd..e19c6a428d0e8eb20fcb62db2d4791e0ec2487fd 100644 (file)
--- a/src/ejabberd_logger.erl
+++ b/src/ejabberd_logger.erl
@@ -62,6 +62,8 @@ get_log_path() ->
 -ifdef(LAGER).
 
 start() ->
+    application:load(sasl),
+    application:set_env(sasl, sasl_error_logger, false),
     application:load(lager),
     ConsoleLog = get_log_path(),
     Dir = filename:dirname(ConsoleLog),
@@ -82,8 +84,7 @@ reopen_log() ->
               whereis(lager_event) ! {rotate, File};
          (_) ->
               ok
-      end, gen_event:which_handlers(lager_event)),
-    reopen_sasl_log().
+      end, gen_event:which_handlers(lager_event)).
 
 get() ->
     case lager:get_loglevel(lager_console_backend) of
@@ -145,8 +146,6 @@ get() ->
 set(LogLevel) ->
     p1_loglevel:set(LogLevel).
 
--endif.
-
 %%%===================================================================
 %%% Internal functions
 %%%===================================================================
@@ -179,3 +178,5 @@ get_sasl_error_logger_type () ->
        {ok, Bad} -> exit ({bad_config, {sasl, {errlog_type, Bad}}});
        _ -> all
     end.
+
+-endif.