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

[mldonkey-commits]

CVSROOT:        /sources/mldonkey
Module name:    mldonkey
Branch:         
Changes by:     spiralvoice <address@hidden>    06/05/25 20:03:10

Modified files:
        distrib        : ChangeLog 
        src/daemon/common: commonOptions.ml 
        src/daemon/driver: driverInterface.ml 

Log message:
        patch #5131

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/mldonkey/mldonkey/distrib/ChangeLog.diff?tr1=1.852&tr2=1.853&r1=text&r2=text
http://cvs.savannah.gnu.org/viewcvs/mldonkey/mldonkey/src/daemon/common/commonOptions.ml.diff?tr1=1.145&tr2=1.146&r1=text&r2=text
http://cvs.savannah.gnu.org/viewcvs/mldonkey/mldonkey/src/daemon/driver/driverInterface.ml.diff?tr1=1.45&tr2=1.46&r1=text&r2=text

Patches:
Index: mldonkey/distrib/ChangeLog
diff -u mldonkey/distrib/ChangeLog:1.852 mldonkey/distrib/ChangeLog:1.853
--- mldonkey/distrib/ChangeLog:1.852    Thu May 25 19:53:33 2006
+++ mldonkey/distrib/ChangeLog  Thu May 25 20:03:10 2006
@@ -15,6 +15,7 @@
 =========
 
 2006/05/25
+5131: New option gui_log_size: number of lines for GUI console messages
 5129: HTML: Display client_bind_addr in options menu
 5124: Log: Login messages can be disabled with verbosity "no-login"
 5130: CommonSwarming: Pangos WIP4a'
Index: mldonkey/src/daemon/common/commonOptions.ml
diff -u mldonkey/src/daemon/common/commonOptions.ml:1.145 
mldonkey/src/daemon/common/commonOptions.ml:1.146
--- mldonkey/src/daemon/common/commonOptions.ml:1.145   Thu May 25 19:52:10 2006
+++ mldonkey/src/daemon/common/commonOptions.ml Thu May 25 20:03:10 2006
@@ -1544,6 +1544,9 @@
     also enable logging in a file after startup using the 'log_file' command."
   string_option "mlnet.log"
 
+let gui_log_size =
+  define_expert_option current_section ["gui_log_size"]
+    "number of lines for GUI console messages" int_option 30
 
 
 
Index: mldonkey/src/daemon/driver/driverInterface.ml
diff -u mldonkey/src/daemon/driver/driverInterface.ml:1.45 
mldonkey/src/daemon/driver/driverInterface.ml:1.46
--- mldonkey/src/daemon/driver/driverInterface.ml:1.45  Thu May 25 19:52:10 2006
+++ mldonkey/src/daemon/driver/driverInterface.ml       Thu May 25 20:03:10 2006
@@ -1332,9 +1332,8 @@
               
           | Console_message_event msg ->  
               Fifo.put console_messages event;
-              if Fifo.length console_messages > 30 then begin
-                  ignore (Fifo.take console_messages)
-                end;
+              if Fifo.length console_messages > !!gui_log_size then
+                  ignore (Fifo.take console_messages);
               add_gui_event event
               
         with _ -> ());