From dcf3afc05644cb5bda73520d904f44e85d6e293a Mon Sep 17 00:00:00 2001
From: martinsumner <martin.sumner@adaptip.co.uk>
Date: Sat, 14 Jan 2017 21:19:51 +0000
Subject: [PATCH] Log basement setting when creating files

---
 src/leveled_log.erl    | 3 ++-
 src/leveled_pclerk.erl | 2 +-
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/src/leveled_log.erl b/src/leveled_log.erl
index f8498f5..5ebd976 100644
--- a/src/leveled_log.erl
+++ b/src/leveled_log.erl
@@ -149,7 +149,8 @@
     {"PC011",
         {info, "Merge completed with MSN=~w to Level=~w and FileCounter=~w"}},
     {"PC012",
-        {info, "File to be created as part of MSN=~w Filename=~s"}},
+        {info, "File to be created as part of MSN=~w Filename=~s "
+                    ++ "IsBasement=~w"}},
     {"PC013",
         {warn, "Merge resulted in empty file ~s"}},
     {"PC015",
diff --git a/src/leveled_pclerk.erl b/src/leveled_pclerk.erl
index 8976761..10b710b 100644
--- a/src/leveled_pclerk.erl
+++ b/src/leveled_pclerk.erl
@@ -193,7 +193,7 @@ do_merge([], [], SinkLevel, _SinkB, _RP, NewSQN, _MaxSQN, Counter, Man0) ->
 do_merge(KL1, KL2, SinkLevel, SinkB, RP, NewSQN, MaxSQN, Counter, Man0) ->
     FileName = lists:flatten(io_lib:format(RP ++ "_~w_~w.sst",
                                             [SinkLevel, Counter])),
-    leveled_log:log("PC012", [NewSQN, FileName]),
+    leveled_log:log("PC012", [NewSQN, FileName, SinkB]),
     TS1 = os:timestamp(),
     case leveled_sst:sst_new(FileName, KL1, KL2, SinkB, SinkLevel, MaxSQN) of
         empty ->