diff --git a/hbs2-peer/app/RefChan.hs b/hbs2-peer/app/RefChan.hs
index c9a9d7db..ab16008e 100644
--- a/hbs2-peer/app/RefChan.hs
+++ b/hbs2-peer/app/RefChan.hs
@@ -442,8 +442,8 @@ logMergeProcess _ q = do
 
       current <- lift $ readLog sto (HashRef h) <&> HashSet.fromList
 
-      trans <- filter (not . flip HashSet.member current) . mconcat <$> mapM (lift . readLog sto) logs
-      -- trans <- mconcat <$> mapM (lift . readLog sto) logs
+      -- trans <- filter (not . flip HashSet.member current) . mconcat <$> mapM (lift . readLog sto) logs
+      trans <- mconcat <$> mapM (lift . readLog sto) logs
 
       guard (not $ List.null trans)