[Mldonkey-commits] mldonkey config/Makefile.in distrib/ChangeLog s...

[mldonkey-commits]

CVSROOT:        /sources/mldonkey
Module name:    mldonkey
Branch:         
Changes by:     spiralvoice <address@hidden>    06/05/09 16:31:37

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

Log message:
        patch #5080

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/mldonkey/mldonkey/config/Makefile.in.diff?tr1=1.156&tr2=1.157&r1=text&r2=text
http://cvs.savannah.gnu.org/viewcvs/mldonkey/mldonkey/distrib/ChangeLog.diff?tr1=1.813&tr2=1.814&r1=text&r2=text
http://cvs.savannah.gnu.org/viewcvs/mldonkey/mldonkey/src/daemon/common/commonServer.ml.diff?tr1=1.28&tr2=1.29&r1=text&r2=text

Patches:
Index: mldonkey/config/Makefile.in
diff -u mldonkey/config/Makefile.in:1.156 mldonkey/config/Makefile.in:1.157
--- mldonkey/config/Makefile.in:1.156   Thu Apr 13 23:53:57 2006
+++ mldonkey/config/Makefile.in Tue May  9 16:31:37 2006
@@ -245,10 +245,10 @@
 
 COMMON_CLIENT_SRCS= \
   $(COMMON)/commonUser.ml \
+  $(COMMON)/commonNetwork.ml \
   $(COMMON)/commonServer.ml \
   $(COMMON)/commonClient.ml \
   $(COMMON)/commonFile.ml \
-  $(COMMON)/commonNetwork.ml \
   $(COMMON)/commonResult.ml \
   $(COMMON)/commonWeb.ml \
   $(COMMON)/commonBlocking.ml  \
Index: mldonkey/distrib/ChangeLog
diff -u mldonkey/distrib/ChangeLog:1.813 mldonkey/distrib/ChangeLog:1.814
--- mldonkey/distrib/ChangeLog:1.813    Tue May  9 11:34:25 2006
+++ mldonkey/distrib/ChangeLog  Tue May  9 16:31:37 2006
@@ -15,6 +15,7 @@
 =========
 
 2006/05/09
+5080: Only print servers of enabled networks (pango)
 5079: Ignore ._* in directory lists (pango)
 5078: Telnet: Remove HTML code from sysinfo command
 5077: FT: Fix fasttrack connection problem and adds a bootstrap nodes file url
Index: mldonkey/src/daemon/common/commonServer.ml
diff -u mldonkey/src/daemon/common/commonServer.ml:1.28 
mldonkey/src/daemon/common/commonServer.ml:1.29
--- mldonkey/src/daemon/common/commonServer.ml:1.28     Wed Mar 29 15:41:33 2006
+++ mldonkey/src/daemon/common/commonServer.ml  Tue May  9 16:31:37 2006
@@ -376,6 +376,7 @@
 let server_print s o =
   let impl = as_server_impl s in
   let n = impl.impl_server_ops.op_server_network in
+  if network_is_enabled n then
   try
     let info =
       try server_info s with e ->