/[mldonkey]/mldonkey/src/networks/donkey/donkeyServers.ml
ViewVC logotype

Diff of /mldonkey/src/networks/donkey/donkeyServers.ml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.31 by spiralvoice, Mon Jun 6 21:23:11 2005 UTC revision 1.32 by spiralvoice, Mon Jun 20 18:58:31 2005 UTC
# Line 295  let client_to_server s t sock = Line 295  let client_to_server s t sock =
295        
296    | M.ServerListReq l ->    | M.ServerListReq l ->
297        if !verbose then lprintf "donkeyServers: Received serverlist\n";        if !verbose then lprintf "donkeyServers: Received serverlist\n";
298        if !!update_server_list then        if !!update_server_list_server then
299          let module Q = M.ServerList in          let module Q = M.ServerList in
300          List.iter (fun s ->          List.iter (fun s ->
301              safe_add_server s.Q.ip s.Q.port              safe_add_server s.Q.ip s.Q.port

Legend:
Removed from v.1.31  
changed lines
  Added in v.1.32

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26