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

[mldonkey-commits]

Index: mldonkey/src/utils/net/tcpClientSocket.ml
diff -u mldonkey/src/utils/net/tcpClientSocket.ml:1.8 
mldonkey/src/utils/net/tcpClientSocket.ml:1.9
--- mldonkey/src/utils/net/tcpClientSocket.ml:1.8       Mon Sep 19 10:09:06 2005
+++ mldonkey/src/utils/net/tcpClientSocket.ml   Tue Oct 11 16:56:33 2005
@@ -39,7 +39,7 @@
 type t = {
     mutable sock : BasicSocket.t;
     mutable rbuf : buf;
-    mutable wfifo : string Fifo2.t;
+    mutable wfifo : string Fifo.t;
     mutable wlen : int;
     mutable wfbuf : buf;
     mutable event_handler : handler;
@@ -555,7 +555,7 @@
       write_power = 1;
       read_power = 1;
       wlen = 0;
-      wfifo = Fifo2.create ();
+      wfifo = Fifo.create ();
     } in
   let sock = BasicSocket.create name fd (tcp_handler t) in
   let name = (fun () ->
@@ -585,7 +585,7 @@
       write_power = 1;
       read_power = 1;
       wlen = 0;
-      wfifo = Fifo2.create ();
+      wfifo = Fifo.create ();
     } in
   let sock = create_blocking name fd (tcp_handler t) in
   t.sock <- sock;