From 0e07296df79dcdbaf07515b8c2af128c6cffc1d4 Mon Sep 17 00:00:00 2001
From: Andrew Thompson <andrew@hijacked.us>
Date: Sun, 3 Feb 2019 17:34:33 -0800
Subject: [PATCH] Add application stops

---
 src/lager_logger_formatter.erl | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/src/lager_logger_formatter.erl b/src/lager_logger_formatter.erl
index ce60da6..e694b16 100644
--- a/src/lager_logger_formatter.erl
+++ b/src/lager_logger_formatter.erl
@@ -79,6 +79,18 @@ format(#{level := Level, msg := {report, #{label := {application_controller, pro
             Msg = lager_format:format("Application ~w started on node ~w", [Name, Node], maps:get(max_size, Config, 1024)),
             do_format(Level, Msg, Metadata, Config)
     end;
+format(#{level := Level, msg := {report, #{label := {application_controller, exit}, report := Report}}, meta := Metadata}, Config) ->
+    {exited, Reason} = lists:keyfind(exited, 1, Report),
+    case application:get_env(lager, suppress_application_start_stop) of
+        {ok, true} when Reason == stopped ->
+            ok;
+        _ ->
+            {application, Name} = lists:keyfind(application, 1, Report),
+            {_Md, Formatted} = format_reason_md(Reason),
+            Msg = lager_format:format("Application ~w exited with reason: ~s", [Name, Formatted], maps:get(max_size, Config, 1024)),
+            do_format(Level, Msg, Metadata, Config)
+    end;
+%% TODO handle proc_lib crash
 format(#{level := _Level, msg := {report, Report}, meta := _Metadata}, _Config) ->
     %do_format(Level, (maps:get(report_cb, Metadata))(Report), Metadata, Config);
     io_lib:format("REPORT ~p~n", [Report]);