/[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.42 by spiralvoice, Sat Sep 17 17:59:47 2005 UTC revision 1.43 by spiralvoice, Sun Sep 18 19:00:52 2005 UTC
# Line 322  let client_to_server s t sock = Line 322  let client_to_server s t sock =
322        (* nice and ugly, but it doesn't require any new fields *)        (* nice and ugly, but it doesn't require any new fields *)
323        set_server_state s (Connected        set_server_state s (Connected
324            ( match s.server_cid with            ( match s.server_cid with
325                Some t -> (match Ip.to_ints t with                Some t -> if low_id t then (-1) else (-2)
                           | _, _, _, 0 -> (-1)  
                           | _ -> (-2))  
326                | _ -> (-1)                | _ -> (-1)
327            )            )
328          );          );

Legend:
Removed from v.1.42  
changed lines
  Added in v.1.43

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