diff --git a/hbs2-peer/app/BlockDownload.hs b/hbs2-peer/app/BlockDownload.hs
index 146b0b8a..7a628961 100644
--- a/hbs2-peer/app/BlockDownload.hs
+++ b/hbs2-peer/app/BlockDownload.hs
@@ -46,9 +46,9 @@ getBlockForDownload = do
   q <- asks (view downloadQ)
   inq <- asks (view blockInQ)
   liftIO $ atomically $ do
-     h <- readTQueue q
-     modifyTVar inq (HashMap.delete h)
-     pure h
+    readTQueue q
+     -- modifyTVar inq (HashMap.delete h)
+     -- pure h
 
 withBlockForDownload :: (MonadIO m, MyPeer e, HasStorage m, HasPeerLocator e m)
                      => Peer e