[Mldonkey-commits] mldonkey distrib/ChangeLog src/daemon/common/co...

[mldonkey-commits]

CVSROOT:        /sources/mldonkey
Module name:    mldonkey
Changes by:     spiralvoice <spiralvoice>       08/05/02 14:56:51

Modified files:
        distrib        : ChangeLog 
        src/daemon/common: commonInteractive.ml 

Log message:
        patch #6503

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/mldonkey/distrib/ChangeLog?cvsroot=mldonkey&r1=1.1372&r2=1.1373
http://cvs.savannah.gnu.org/viewcvs/mldonkey/src/daemon/common/commonInteractive.ml?cvsroot=mldonkey&r1=1.104&r2=1.105

Patches:
Index: distrib/ChangeLog
===================================================================
RCS file: /sources/mldonkey/mldonkey/distrib/ChangeLog,v
retrieving revision 1.1372
retrieving revision 1.1373
diff -u -b -r1.1372 -r1.1373
--- distrib/ChangeLog   31 Mar 2008 19:58:55 -0000      1.1372
+++ distrib/ChangeLog   2 May 2008 14:56:51 -0000       1.1373
@@ -14,6 +14,9 @@
 ChangeLog
 =========
 
+2008/05/02
+6503: Remove release status when download is finished
+
 2008/03/31
 6465: BT: Send correct downloaded value when download starts to tracker
       (colchaodemola)

Index: src/daemon/common/commonInteractive.ml
===================================================================
RCS file: /sources/mldonkey/mldonkey/src/daemon/common/commonInteractive.ml,v
retrieving revision 1.104
retrieving revision 1.105
diff -u -b -r1.104 -r1.105
--- src/daemon/common/commonInteractive.ml      4 Feb 2008 23:58:22 -0000       
1.104
+++ src/daemon/common/commonInteractive.ml      2 May 2008 14:56:51 -0000       
1.105
@@ -386,6 +386,7 @@
     let impl = as_file_impl file in
     if impl.impl_file_state = FileDownloading then begin
         CommonSwarming.duplicate_chunks ();
+        set_file_release file false (admin_user ());
         files =:= List2.removeq file !!files;
         done_files =:= file :: !!done_files;
         update_file_state impl FileDownloaded;