Parent Directory | Revision Log | Patch
revision 1.18 by spiralvoice, Mon Aug 15 20:28:50 2005 UTC | revision 1.19 by spiralvoice, Sat Sep 17 17:59:46 2005 UTC | |
---|---|---|
# | Line 598 let clean_tracker_timer () = | Line 598 let clean_tracker_timer () = |
598 | if peer.peer_active < time_threshold then | if peer.peer_active < time_threshold then |
599 | old_peers := peer :: !old_peers | old_peers := peer :: !old_peers |
600 | else | else |
601 | if Ip.valid peer.peer_ip && ip_reachable peer.peer_ip then | if Ip.usable peer.peer_ip then |
602 | list := peer :: !list) | list := peer :: !list) |
603 | tracker.tracker_table; | tracker.tracker_table; |
604 | List.iter (fun p -> | List.iter (fun p -> |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |