[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/31 22:25:31

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

Log message:
        patch #5150

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/mldonkey/mldonkey/distrib/ChangeLog.diff?tr1=1.866&tr2=1.867&r1=text&r2=text
http://cvs.savannah.gnu.org/viewcvs/mldonkey/mldonkey/src/daemon/common/commonServer.ml.diff?tr1=1.31&tr2=1.32&r1=text&r2=text

Patches:
Index: mldonkey/distrib/ChangeLog
diff -u mldonkey/distrib/ChangeLog:1.866 mldonkey/distrib/ChangeLog:1.867
--- mldonkey/distrib/ChangeLog:1.866    Wed May 31 20:25:48 2006
+++ mldonkey/distrib/ChangeLog  Wed May 31 22:25:31 2006
@@ -14,6 +14,9 @@
 ChangeLog
 =========
 
+2006/06/01
+5150: Log: Fix log when server list is empty in check_blocked_servers
+
 2006/05/31
 5149: Log: Some additions for commonSwarming
 5148: Mail: Fix for multiline SMTP responses (zet)
Index: mldonkey/src/daemon/common/commonServer.ml
diff -u mldonkey/src/daemon/common/commonServer.ml:1.31 
mldonkey/src/daemon/common/commonServer.ml:1.32
--- mldonkey/src/daemon/common/commonServer.ml:1.31     Wed May 31 20:06:02 2006
+++ mldonkey/src/daemon/common/commonServer.ml  Wed May 31 22:25:31 2006
@@ -334,8 +334,9 @@
                 info.G.server_port);
       end;
       server_must_update s)
-  with e ->
-    lprintf_nl "Exception in check_blocked_servers: %s" (Printexc2.to_string e)
+  with
+    Not_found -> ()
+  | e -> lprintf_nl "Exception in check_blocked_servers: %s" 
(Printexc2.to_string e)
 
 let server_must_update_all () =
   try