[Mldonkey-commits] Changes to mldonkey/src/utils/net/ip.ml

[mldonkey-commits]

Index: mldonkey/src/utils/net/ip.ml
diff -u mldonkey/src/utils/net/ip.ml:1.13 mldonkey/src/utils/net/ip.ml:1.14
--- mldonkey/src/utils/net/ip.ml:1.13   Sat Aug  6 19:46:34 2005
+++ mldonkey/src/utils/net/ip.ml        Thu Sep  1 00:04:12 2005
@@ -155,7 +155,7 @@
       with _ -> ip
     else ip
   with _ ->
-      lprintf_nl "[DNS]: Resolving [%s] ..." name;
+      lprintf_nl "[DNS] Resolving [%s] ..." name;
       let ip = gethostbyname name in
       Hashtbl.add ip_cache name (ip, current_time +. 3600.);
       ip
@@ -283,7 +283,7 @@
                     Hashtbl.add ip_cache job.name (ip, current_time +. 3600.);
                     job.handler ip
                   end else begin
-                    lprintf "[DNS]: lookup error: %s: address not found\n" 
job.name;
+                    lprintf_nl "[DNS] could not resolve %s, check URL" 
job.name;
                     raise Not_found
                   end
               end else raise Exit