[Mldonkey-commits] Changes to mldonkey/src/utils/net/tcpServerSocket.ml

[mldonkey-commits]

Index: mldonkey/src/utils/net/tcpServerSocket.ml
diff -u mldonkey/src/utils/net/tcpServerSocket.ml:1.6 
mldonkey/src/utils/net/tcpServerSocket.ml:1.7
--- mldonkey/src/utils/net/tcpServerSocket.ml:1.6       Mon Jun  6 21:23:11 2005
+++ mldonkey/src/utils/net/tcpServerSocket.ml   Fri Aug 26 21:12:23 2005
@@ -112,7 +112,7 @@
       Unix.Unix_error (Unix.EADDRINUSE, _, _) -> 
        lprintf "This is normally caused by another application currently using 
this port.\n";
        lprintf "Close that application and restart MLDonkey, exiting...\n";
-       Pervasives.exit 0
+       Pervasives.exit 69
       | _ -> raise e
   
 let create_connections_contoler name f =