From 50557004616826086a88d0108c638957c1291742 Mon Sep 17 00:00:00 2001
From: Dmitry Zuikov <dzuikov@gmail.com>
Date: Mon, 27 Feb 2023 10:37:23 +0300
Subject: [PATCH] wtf

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

diff --git a/hbs2-peer/app/PeerMain.hs b/hbs2-peer/app/PeerMain.hs
index 4bdb5cdb..76c23eb6 100644
--- a/hbs2-peer/app/PeerMain.hs
+++ b/hbs2-peer/app/PeerMain.hs
@@ -461,7 +461,7 @@ runPeer opts = Exception.handle myException $ do
                  pd <- find (KnownPeerKey pip) id -- <&> isJust
                  banned <- maybe (pure False) (peerBanned pip) pd
                  let known = isJust pd && not banned
-                 unless known $ sendPing pip
+                 sendPing pip
 
               subscribe @e BlockAnnounceInfoKey $ \(BlockAnnounceEvent p bi no) -> do
                  pa <- toPeerAddr p