From e6c4c9eff8b95e480b372aa0d4a5619ceb769434 Mon Sep 17 00:00:00 2001
From: martinsumner <martin.sumner@adaptip.co.uk>
Date: Sun, 15 Jan 2017 11:04:26 +0000
Subject: [PATCH] Log deletions from mnaifest (via GC)

---
 src/leveled_log.erl      | 5 ++++-
 src/leveled_manifest.erl | 1 +
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/src/leveled_log.erl b/src/leveled_log.erl
index 637e99f..525586d 100644
--- a/src/leveled_log.erl
+++ b/src/leveled_log.erl
@@ -127,7 +127,10 @@
         {warn, "Snapshot with pid ~w timed out and so deletion will "
                     ++ "continue regardless"}},
     {"P0035",
-        {info, "Startup with Manifest SQN of ~w~n"}},
+        {info, "Startup with Manifest SQN of ~w"}},
+    {"P0036",
+        {info, "Garbage collection on mnaifest removes key for filename ~s"}},
+        
     {"PC001",
         {info, "Penciller's clerk ~w started with owner ~w"}},
     {"PC002",
diff --git a/src/leveled_manifest.erl b/src/leveled_manifest.erl
index cd6fc12..316a09b 100644
--- a/src/leveled_manifest.erl
+++ b/src/leveled_manifest.erl
@@ -480,6 +480,7 @@ key_lookup(Manifest, Level, {LastKey, LastFN}, KeyToFind, ManSQN, GC) ->
                         {true, GC_SQN} ->
                             case TombSQN < GC_SQN of
                                 true ->
+                                    leveled_log:log("P0036", [element(3, K)]),
                                     ets:delete(Manifest, K);
                                 false ->
                                     ok