haskoin-node 0.10.0 → 0.10.1

raw patch · 3 files changed

+9/−3 lines, 3 files

Files

CHANGELOG.md +4/−0
haskoin-node.cabal +2/−2
src/Haskoin/Node/Manager.hs +3/−1

CHANGELOG.md view

@@ -4,6 +4,10 @@ The format is based on [Keep a Changelog](http://keepachangelog.com/en/1.0.0/) and this project adheres to [Semantic Versioning](http://semver.org/spec/v2.0.0.html). +## 0.10.1+### Changed+- Disconnect old peers after 48 hours instead of 30 minutes.+ ## 0.10.0 ### Changed - Move modules out of Network.Haskoin namespace.

haskoin-node.cabal view

@@ -4,10 +4,10 @@ -- -- see: https://github.com/sol/hpack ----- hash: 86210eacdc6447f4f56d49f633d67f529041ec0f96a689bfbd99005150653c2e+-- hash: bb0aedb8f50d4a112826da8a55f006880d92273524df56e40c563a57be6747dd  name:           haskoin-node-version:        0.10.0+version:        0.10.1 synopsis:       Haskoin Node P2P library for Bitcoin and Bitcoin Cash description:    Bitcoin and Bitcoin Cash peer-to-peer protocol library featuring headers-first synchronisation. category:       Bitcoin, Finance, Network

src/Haskoin/Node/Manager.hs view

@@ -242,7 +242,9 @@         Nothing -> return ()         Just o -> do             now <- round <$> liftIO getPOSIXTime-            when (onlinePeerConnectTime o < now - 1800) (killPeer PeerTooOld p)+            when+                (onlinePeerConnectTime o < now - 48 * 3600)+                (killPeer PeerTooOld p)     atomically (lastPing b p) >>= \case         Nothing -> pingPeer p         Just t -> do