diff options
| author | Sam Truzjan <pxqr.sta@gmail.com> | 2013-12-28 12:22:21 +0400 |
|---|---|---|
| committer | Sam Truzjan <pxqr.sta@gmail.com> | 2013-12-28 12:22:21 +0400 |
| commit | 573f8d0411abbf0018077487ddd58150c3d1208c (patch) | |
| tree | 5dd2034231314cf8c3a12a71eba282afba2ed1e7 /src/Network | |
| parent | 75880c7cdd6ec3eac89a04f5c473dfd4efbff012 (diff) | |
Drop old node if it is not responding
Diffstat (limited to 'src/Network')
| -rw-r--r-- | src/Network/BitTorrent/DHT/Routing.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Network/BitTorrent/DHT/Routing.hs b/src/Network/BitTorrent/DHT/Routing.hs index a007c279..b37f2613 100644 --- a/src/Network/BitTorrent/DHT/Routing.hs +++ b/src/Network/BitTorrent/DHT/Routing.hs | |||
| @@ -208,7 +208,7 @@ insertBucket curTime info bucket | |||
| 208 | = NeedPing nodeAddr $ \ mtime -> | 208 | = NeedPing nodeAddr $ \ mtime -> |
| 209 | insertNode info $ | 209 | insertNode info $ |
| 210 | case mtime of | 210 | case mtime of |
| 211 | Nothing -> bucket | 211 | Nothing -> rest |
| 212 | Just pongTime -> PSQ.insert old pongTime bucket | 212 | Just pongTime -> PSQ.insert old pongTime bucket |
| 213 | 213 | ||
| 214 | -- bucket is good, but not full => we can insert a new node | 214 | -- bucket is good, but not full => we can insert a new node |