[Mldonkey-commits] mldonkey distrib/ChangeLog src/networks/bittorr...

[mldonkey-commits]

CVSROOT:        /sources/mldonkey
Module name:    mldonkey
Changes by:     spiralvoice <spiralvoice>       07/09/01 13:53:31

Modified files:
        distrib        : ChangeLog 
        src/networks/bittorrent: bTClients.ml 

Log message:
        patch #6179

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/mldonkey/distrib/ChangeLog?cvsroot=mldonkey&r1=1.1316&r2=1.1317
http://cvs.savannah.gnu.org/viewcvs/mldonkey/src/networks/bittorrent/bTClients.ml?cvsroot=mldonkey&r1=1.96&r2=1.97

Patches:
Index: distrib/ChangeLog
===================================================================
RCS file: /sources/mldonkey/mldonkey/distrib/ChangeLog,v
retrieving revision 1.1316
retrieving revision 1.1317
diff -u -b -r1.1316 -r1.1317
--- distrib/ChangeLog   1 Sep 2007 13:51:23 -0000       1.1316
+++ distrib/ChangeLog   1 Sep 2007 13:53:31 -0000       1.1317
@@ -15,6 +15,7 @@
 =========
 
 2007/09/01
+6179: BT: Send correct downloaded amount to tracker when download completed
 6174: BT: Encode non-UTF8 filenames using "encoding" or "codepage" data
       from .torrent if present
 

Index: src/networks/bittorrent/bTClients.ml
===================================================================
RCS file: /sources/mldonkey/mldonkey/src/networks/bittorrent/bTClients.ml,v
retrieving revision 1.96
retrieving revision 1.97
diff -u -b -r1.96 -r1.97
--- src/networks/bittorrent/bTClients.ml        25 Jul 2007 19:27:09 -0000      
1.96
+++ src/networks/bittorrent/bTClients.ml        1 Sep 2007 13:53:31 -0000       
1.97
@@ -104,7 +104,7 @@
         let local_downloaded = CommonSwarming.downloaded swarmer in
         let left = file_size file -- local_downloaded in
         match event with
-          | "completed" -> [("event", "completed")],false,zero,zero
+        | "completed" -> [("event", "completed")],false,local_downloaded,zero
         | "started" -> [("event", "started")],true,local_downloaded, left
         | "stopped" -> [("event", "stopped")],false,local_downloaded, left
         | _ -> [],true,local_downloaded, left