haskoin-node 0.11.2 → 0.11.3

raw patch · 3 files changed

+10/−5 lines, 3 files

Files

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

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.11.3+### Changed+- Revert including multiline decoding error text in logs.+ ## 0.11.2 ### Changed - Include header decoding error text in logs.

haskoin-node.cabal view

@@ -4,10 +4,10 @@ -- -- see: https://github.com/sol/hpack ----- hash: 6236cea0348e8901249428fa157e41cb58feaf7b7c8bdeb0fa216deefb620b84+-- hash: 68c2f796296143516ef7f719674817c9233b3dec269de968a1ed75bc09da710d  name:           haskoin-node-version:        0.11.2+version:        0.11.3 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/Peer.hs view

@@ -80,9 +80,10 @@     forever $ do         x <- takeCE 24 .| foldC         case decode x of-            Left e -> do-                $(logErrorS) (peerString a) $-                    "Could not decode incoming message header: " <> cs e+            Left _ -> do+                $(logErrorS)+                    (peerString a)+                    "Could not decode incoming message header"                 throwIO DecodeHeaderError             Right (MessageHeader _ _ len _) -> do                 when (len > 32 * 2 ^ (20 :: Int)) $ do