[Mldonkey-commits] Changes to mldonkey/src/networks/donkey/donkeyServers.ml

[mldonkey-commits]

Index: mldonkey/src/networks/donkey/donkeyServers.ml
diff -u mldonkey/src/networks/donkey/donkeyServers.ml:1.42 
mldonkey/src/networks/donkey/donkeyServers.ml:1.43
--- mldonkey/src/networks/donkey/donkeyServers.ml:1.42  Sat Sep 17 17:59:47 2005
+++ mldonkey/src/networks/donkey/donkeyServers.ml       Sun Sep 18 19:00:52 2005
@@ -322,9 +322,7 @@
       (* nice and ugly, but it doesn't require any new fields *)
       set_server_state s (Connected
           ( match s.server_cid with
-              Some t -> (match Ip.to_ints t with
-                          | _, _, _, 0 -> (-1)
-                          | _ -> (-2))
+              Some t -> if low_id t then (-1) else (-2) 
               | _ -> (-1)
           )
         );