diff --git a/hbs2-peer/app/RefChan.hs b/hbs2-peer/app/RefChan.hs
index 0d6849a1..c54e866e 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)