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

[mldonkey-commits]

CVSROOT:        /sources/mldonkey
Module name:    mldonkey
Changes by:     spiralvoice <spiralvoice>       13/07/07 11:04:12

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

Log message:
        patch #8113

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/mldonkey/distrib/ChangeLog?cvsroot=mldonkey&r1=1.1576&r2=1.1577
http://cvs.savannah.gnu.org/viewcvs/mldonkey/src/daemon/common/commonGlobals.ml?cvsroot=mldonkey&r1=1.94&r2=1.95

Patches:
Index: distrib/ChangeLog
===================================================================
RCS file: /sources/mldonkey/mldonkey/distrib/ChangeLog,v
retrieving revision 1.1576
retrieving revision 1.1577
diff -u -b -r1.1576 -r1.1577
--- distrib/ChangeLog   7 Jul 2013 11:03:33 -0000       1.1576
+++ distrib/ChangeLog   7 Jul 2013 11:04:11 -0000       1.1577
@@ -15,6 +15,7 @@
 =========
 
 2013/07/07:
+8113: IP discover: Fix broken URL
 8112: BT/HTML: select/unselect whole directories in BT multifile downloads 
(ygrek)
 8110: http_server: refactor error_page (ygrek)
 8109: FTP: fix CWD (ygrek)

Index: src/daemon/common/commonGlobals.ml
===================================================================
RCS file: /sources/mldonkey/mldonkey/src/daemon/common/commonGlobals.ml,v
retrieving revision 1.94
retrieving revision 1.95
diff -u -b -r1.94 -r1.95
--- src/daemon/common/commonGlobals.ml  23 May 2012 17:49:37 -0000      1.94
+++ src/daemon/common/commonGlobals.ml  7 Jul 2013 11:04:11 -0000       1.95
@@ -836,7 +836,7 @@
       if !verbose then lprintf_nl "started IP discovery";
       let module H = Http_client in
       let r = { H.basic_request with
-        H.req_url = Url.of_string 
"http://automation.whatismyip.com/n09230945.asp";;
+        H.req_url = Url.of_string "http://dynupdate.no-ip.com/ip.php";;
         H.req_proxy = !CommonOptions.http_proxy;
         H.req_max_retry = 10;
         H.req_user_agent = get_user_agent () }