File 0006-Prevent-a-term-is-constructed-but-never-used-warning.patch of Package lager

From 2f0a8c07822f232e4107fa0bd25966f3247b737c Mon Sep 17 00:00:00 2001
From: "Paulo F. Oliveira" <paulo.ferraz.oliveira@gmail.com>
Date: Fri, 5 Mar 2021 11:25:45 +0000
Subject: [PATCH] Prevent "a term is constructed, but never used" warning

We use a construct, as suggested by @bjorng, to modify the generated marker
---
 src/lager_transform.erl | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)

diff --git a/src/lager_transform.erl b/src/lager_transform.erl
index a6496c7..bd03512 100644
--- a/src/lager_transform.erl
+++ b/src/lager_transform.erl
@@ -198,17 +198,14 @@ do_transform(Line, SinkName, Severity, Arguments0, Safety) ->
                   [{tuple,Line,
                           [{atom,Line,undefined},{atom,Line,undefined},{var,Line,'_'}]}],
                   [],
-                  %% trick the linter into avoiding a 'term constructed but not used' error:
-                  %% (fun() -> {error, lager_not_running} end)()
-                  [{call, Line, {'fun', Line, {clauses, [{clause, Line, [],[], [{tuple, Line, [{atom, Line, error},{atom, Line, lager_not_running}]}]}]}}, []}]
+                  [{tuple, erl_anno:set_generated(true, Line), [{atom, Line, error},{atom, Line, lager_not_running}]}]
           },
           %% {undefined, _, _} -> {error, {sink_not_configured, Sink}};
           {clause,Line,
                   [{tuple,Line,
                           [{atom,Line,undefined},{var,Line,'_'},{var,Line,'_'}]}],
                   [],
-                  %% same trick as above to avoid linter error
-                  [{call, Line, {'fun', Line, {clauses, [{clause, Line, [],[], [{tuple,Line, [{atom,Line,error}, {tuple,Line,[{atom,Line,sink_not_configured},{atom,Line,SinkName}]}]}]}]}}, []}] 
+                  [{tuple, erl_anno:set_generated(true, Line), [{atom,Line,error}, {tuple,Line,[{atom,Line,sink_not_configured},{atom,Line,SinkName}]}]}]
           },
           %% {SinkPid, _, {Level, Traces}} when ... -> lager:do_log/9;
           {clause,Line,
-- 
2.26.2