diff options
author | Sam Truzjan <pxqr.sta@gmail.com> | 2013-12-25 05:32:38 +0400 |
---|---|---|
committer | Sam Truzjan <pxqr.sta@gmail.com> | 2013-12-25 05:32:38 +0400 |
commit | 18347913bc66b27889c9d81d41cfe7d9a1d0d90d (patch) | |
tree | 2f15acb9fe0bc80d8d56f05a1f18a41ce651989f /src/Network/BitTorrent/Core/PeerAddr.hs | |
parent | e3f7c822a3e6f57260881fa3245ad2b89087ecce (diff) |
Fix GotPeers(peers) key
Diffstat (limited to 'src/Network/BitTorrent/Core/PeerAddr.hs')
-rw-r--r-- | src/Network/BitTorrent/Core/PeerAddr.hs | 2 |
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. |
257 | newtype PeerStore a = PeerStore (HashMap InfoHash [PeerAddr a]) | 257 | newtype PeerStore ip = PeerStore (HashMap InfoHash [PeerAddr ip]) |
258 | 258 | ||
259 | -- | Empty store. | 259 | -- | Empty store. |
260 | instance Default (PeerStore a) where | 260 | instance Default (PeerStore a) where |