summaryrefslogtreecommitdiff
path: root/src/Network/BitTorrent/Core
diff options
context:
space:
mode:
authorSam Truzjan <pxqr.sta@gmail.com>2013-12-25 05:32:38 +0400
committerSam Truzjan <pxqr.sta@gmail.com>2013-12-25 05:32:38 +0400
commit18347913bc66b27889c9d81d41cfe7d9a1d0d90d (patch)
tree2f15acb9fe0bc80d8d56f05a1f18a41ce651989f /src/Network/BitTorrent/Core
parente3f7c822a3e6f57260881fa3245ad2b89087ecce (diff)
Fix GotPeers(peers) key
Diffstat (limited to 'src/Network/BitTorrent/Core')
-rw-r--r--src/Network/BitTorrent/Core/PeerAddr.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Network/BitTorrent/Core/PeerAddr.hs b/src/Network/BitTorrent/Core/PeerAddr.hs
index bc4a1078..86b88491 100644
--- a/src/Network/BitTorrent/Core/PeerAddr.hs
+++ b/src/Network/BitTorrent/Core/PeerAddr.hs
@@ -254,7 +254,7 @@ peerSockAddr PeerAddr {..} =
254 254
255-- | Storage used to keep track a set of known peers in client, 255-- | Storage used to keep track a set of known peers in client,
256-- tracker or DHT sessions. 256-- tracker or DHT sessions.
257newtype PeerStore a = PeerStore (HashMap InfoHash [PeerAddr a]) 257newtype PeerStore ip = PeerStore (HashMap InfoHash [PeerAddr ip])
258 258
259-- | Empty store. 259-- | Empty store.
260instance Default (PeerStore a) where 260instance Default (PeerStore a) where