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

[mldonkey-commits]

CVSROOT:        /sources/mldonkey
Module name:    mldonkey
Changes by:     spiralvoice <spiralvoice>       06/09/14 17:31:01

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

Log message:
        patch #5388

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/mldonkey/distrib/ChangeLog?cvsroot=mldonkey&r1=1.1002&r2=1.1003
http://cvs.savannah.gnu.org/viewcvs/mldonkey/src/daemon/common/commonClient.ml?cvsroot=mldonkey&r1=1.29&r2=1.30

Patches:
Index: distrib/ChangeLog
===================================================================
RCS file: /sources/mldonkey/mldonkey/distrib/ChangeLog,v
retrieving revision 1.1002
retrieving revision 1.1003
diff -u -b -r1.1002 -r1.1003
--- distrib/ChangeLog   13 Sep 2006 08:56:33 -0000      1.1002
+++ distrib/ChangeLog   14 Sep 2006 17:31:00 -0000      1.1003
@@ -14,6 +14,9 @@
 ChangeLog
 =========
 
+2006/09/14
+5388: Small log update
+
 2006/09/13
 5386: Telnet: Longhelp cleanup
 5385: Command mem_stats: verbosity 0 is default now

Index: src/daemon/common/commonClient.ml
===================================================================
RCS file: /sources/mldonkey/mldonkey/src/daemon/common/commonClient.ml,v
retrieving revision 1.29
retrieving revision 1.30
diff -u -b -r1.29 -r1.30
--- src/daemon/common/commonClient.ml   16 Aug 2006 19:12:08 -0000      1.29
+++ src/daemon/common/commonClient.ml   14 Sep 2006 17:31:00 -0000      1.30
@@ -24,6 +24,11 @@
 open CommonTypes
 open CommonGlobals
 
+let log_prefix = "[cCl]"
+
+let lprintf_nl fmt =
+  lprintf_nl2 log_prefix fmt
+
 type 'a client_impl = {
     mutable impl_client_type : client_type;
     mutable impl_client_state : host_state;
@@ -466,7 +471,7 @@
       if i.GuiTypes.client_uploaded = Int64.zero && ctime > 1 then
         begin
          client_disconnect c;
-          if !verbose then lprintf_nl "[cCl] disconnected client %d: [%s %s] 
%s after %d %s of silence."
+          if !verbose then lprintf_nl "disconnected client %d: [%s %s] %s 
after %d %s of silence."
            (client_num c)
            i.GuiTypes.client_software
            i.GuiTypes.client_release