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

[mldonkey-commits]

Index: mldonkey/src/networks/donkey/donkeyOneFile.ml
diff -u mldonkey/src/networks/donkey/donkeyOneFile.ml:1.26 
mldonkey/src/networks/donkey/donkeyOneFile.ml:1.27
--- mldonkey/src/networks/donkey/donkeyOneFile.ml:1.26  Thu Aug 18 13:00:03 2005
+++ mldonkey/src/networks/donkey/donkeyOneFile.ml       Wed Sep 14 14:35:44 2005
@@ -429,8 +429,6 @@
           
           set_client_state c (Connected_downloading (file_num file));
           let len64 = Int64.of_int bloc_len in
-          count_download c file len64;
-          network_must_update network;
 
 (* TODO: verify the received data has been requested *)
           
@@ -462,8 +460,8 @@
 (*            List.iter Int64Swarmer.alloc_range c.client_ranges; *)
           let new_downloaded = 
             Int64Swarmer.downloaded swarmer in
-          c.client_downloaded <- c.client_downloaded ++ (
-            new_downloaded -- old_downloaded);
+          count_download c file (new_downloaded -- old_downloaded);
+          network_must_update network;
 (*
           if not (List.mem c.client_ip bb.block_contributors) then
             bb.block_contributors <- c.client_ip ::