[Mldonkey-commits] Changes to mldonkey/src/daemon/common/commonWeb.ml

[mldonkey-commits]

Index: mldonkey/src/daemon/common/commonWeb.ml
diff -u mldonkey/src/daemon/common/commonWeb.ml:1.12 
mldonkey/src/daemon/common/commonWeb.ml:1.13
--- mldonkey/src/daemon/common/commonWeb.ml:1.12        Mon May  2 11:40:27 2005
+++ mldonkey/src/daemon/common/commonWeb.ml     Thu Jul  7 00:25:45 2005
@@ -58,7 +58,7 @@
   
   
 let load_url kind url =
-  lprintf "QUERY URL %s\n" url; 
+  lprintf_nl "CommonWeb: QUERY URL %s" url; 
   let f = 
     try 
       (List.assoc kind !file_kinds) url
@@ -73,7 +73,7 @@
   try 
     (List.assoc kind !file_kinds) file file
   with e -> 
-      lprintf "Exception %s while loading kind %s\n" 
+      lprintf_nl "Exception %s while loading kind %s" 
         (Printexc2.to_string e)
       kind
 
@@ -185,7 +185,7 @@
             UdpSocket.write propagation_socket false s (Ip.from_name name) 
port;
             
           with e ->
-              lprintf "Exception %s in udp_sendonly\n" (Printexc2.to_string e);
+              lprintf_nl "Exception %s in udp_sendonly" (Printexc2.to_string 
e);
         end      
     end