[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Mldonkey-commits] Changes to mldonkey/src/daemon/common/commonChat.ml
From: |
mldonkey-commits |
Subject: |
[Mldonkey-commits] Changes to mldonkey/src/daemon/common/commonChat.ml |
Date: |
Fri, 22 Jul 2005 06:58:56 -0400 |
Index: mldonkey/src/daemon/common/commonChat.ml
diff -u mldonkey/src/daemon/common/commonChat.ml:1.5
mldonkey/src/daemon/common/commonChat.ml:1.6
--- mldonkey/src/daemon/common/commonChat.ml:1.5 Thu Jul 7 00:25:45 2005
+++ mldonkey/src/daemon/common/commonChat.ml Fri Jul 22 10:58:54 2005
@@ -47,12 +47,12 @@
with
| Unix.Unix_error (e,s1,s2) -> if !CommonOptions.verbose then begin
let s = (Unix.error_message e)^" : "^s1^" "^s2 in
- lprintf "Testing chat: %s\nChat app IP %s, port %d\n" s
+ lprintf_nl "Error %s with chat on IP %s, port %d" s
!!O.chat_app_host !!O.chat_app_port;
close_out chanout
end
| e -> if !CommonOptions.verbose then begin
- lprintf "Testing chat: %s\nChat app IP %s, port %d\n"
+ lprintf_nl "Error %s with chat on IP %s, port %d"
(Printexc2.to_string e)
!!O.chat_app_host !!O.chat_app_port;
close_out chanout