wip, log merging, debug-11

2023-07-19 12:32:04 +03:00 · 2023-07-19 12:32:04 +03:00 · 0e1bf90928
parent 43139c44ea
commit 0e1bf90928
1 changed files with 1 additions and 0 deletions
--- 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