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

[mldonkey-commits]

Index: mldonkey/src/networks/donkey/donkeyClient.ml
diff -u mldonkey/src/networks/donkey/donkeyClient.ml:1.54 
mldonkey/src/networks/donkey/donkeyClient.ml:1.55
--- mldonkey/src/networks/donkey/donkeyClient.ml:1.54   Fri Jul 22 14:32:12 2005
+++ mldonkey/src/networks/donkey/donkeyClient.ml        Mon Aug  1 20:15:28 2005
@@ -190,6 +190,7 @@
   let client_enter_upload_queue c =
     do_if_connected  c.client_source.DonkeySources.source_sock (fun sock ->
         set_rtimeout sock !!upload_timeout;
+       c.client_connect_time <- last_time ();
         client_send c (
           let module M = DonkeyProtoClient in
           let module Q = M.AvailableSlot in