tuned ping

This commit is contained in:
Dmitry Zuikov 2023-02-22 18:59:57 +03:00
parent 3cec2f711f
commit a41a3098fd
1 changed files with 1 additions and 1 deletions

View File

@ -154,7 +154,7 @@ peerPingLoop = do
fnum <- liftIO $ readTVarIO pfails
fdown <- liftIO $ readTVarIO pdownfails
when (fnum > 2) do -- FIXME: hardcode!
when (fnum > 4) do -- FIXME: hardcode!
warn $ "removing peer" <+> pretty p <+> "for not responding to our pings"
delPeers pl [p]
expire (PeerInfoKey p)