From 0e1bf90928e3c5025c97a3aa73f0da49baf033fa Mon Sep 17 00:00:00 2001
From: Dmitry Zuikov <dzuikov@gmail.com>
Date: Wed, 19 Jul 2023 12:32:04 +0300
Subject: [PATCH] wip, log merging, debug-11

---
 hbs2-peer/app/RefChan.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/hbs2-peer/app/RefChan.hs b/hbs2-peer/app/RefChan.hs
index f09999e3..83946903 100644
--- a/hbs2-peer/app/RefChan.hs
+++ b/hbs2-peer/app/RefChan.hs
@@ -191,6 +191,7 @@ refChanWorker env brains = do
 
     h <- liftIO $ getRef sto (RefChanLogKey @s chan)
 
+    -- игнорируем, если синхронно
     unless ((HashRef <$> h) == Just val) do
 
       refChanAddDownload env chan val $ \href -> do