diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -4,6 +4,12 @@
 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).
 
+## [1.1.3] - 2024-05-23
+
+### Fixed
+
+- Tickle a peer whenever a message is received.
+
 ## [1.1.2] - 2024-05-23
 
 ### Fixed
diff --git a/haskoin-node.cabal b/haskoin-node.cabal
--- a/haskoin-node.cabal
+++ b/haskoin-node.cabal
@@ -4,10 +4,10 @@
 --
 -- see: https://github.com/sol/hpack
 --
--- hash: f9da60a901490032b5ae1b55fffedce7aa9ec901f923378f4994a69b7c2f0eab
+-- hash: 345e7baf0677c96be51bb4f0abff6d4cf748d03bdffff9fcee58a1daa01d850d
 
 name:           haskoin-node
-version:        1.1.2
+version:        1.1.3
 synopsis:       P2P library for Bitcoin and Bitcoin Cash
 description:    Please see the README on GitHub at <https://github.com/haskoin/haskoin-node#readme>
 category:       Bitcoin, Finance, Network
diff --git a/src/Haskoin/Node.hs b/src/Haskoin/Node.hs
--- a/src/Haskoin/Node.hs
+++ b/src/Haskoin/Node.hs
@@ -170,6 +170,7 @@
         MHeaders (Headers hs) ->
           chainHeaders p (map fst hs) ch
         _ -> return ()
+      ticklePeer mgr p
   publish (PeerEvent event) output
 
 -- | Launch node process in the foreground.
diff --git a/src/Haskoin/Node/PeerMgr.hs b/src/Haskoin/Node/PeerMgr.hs
--- a/src/Haskoin/Node/PeerMgr.hs
+++ b/src/Haskoin/Node/PeerMgr.hs
@@ -25,6 +25,7 @@
     peerMgrVerAck,
     getPeers,
     getOnlinePeer,
+    ticklePeer,
     buildVersion,
     myVersion,
     toSockAddr,
@@ -386,6 +387,12 @@
     "Housekeeping for peer " <> p.label
   checkPeer p
 
+ticklePeer :: ( MonadLoggerIO m) => PeerMgr -> Peer -> m ()
+ticklePeer m p = do
+  $(logDebugS) "PeerMgr" $ "Tickle peer " <> p.label
+  t <- liftIO getCurrentTime
+  atomically $ modifyPeer m.peers p $ \o -> o {tickled = t}
+
 checkPeer :: (MonadManager m, MonadLoggerIO m) => Peer -> m ()
 checkPeer p = do
   busy <- getBusy p
@@ -633,8 +640,7 @@
       b
       o
         { ping = Nothing,
-          pings = sort $ take 11 $ diff : o.pings,
-          tickled = now
+          pings = sort $ take 11 $ diff : o.pings
         }
 
 setPeerPing :: TVar [OnlinePeer] -> Word64 -> UTCTime -> Peer -> STM ()