[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Mldonkey-commits] Changes to mldonkey/src/utils/lib/charset.ml
From: |
mldonkey-commits |
Subject: |
[Mldonkey-commits] Changes to mldonkey/src/utils/lib/charset.ml |
Date: |
Mon, 01 Aug 2005 16:09:29 -0400 |
Index: mldonkey/src/utils/lib/charset.ml
diff -u mldonkey/src/utils/lib/charset.ml:1.4
mldonkey/src/utils/lib/charset.ml:1.5
--- mldonkey/src/utils/lib/charset.ml:1.4 Tue Jun 28 23:17:08 2005
+++ mldonkey/src/utils/lib/charset.ml Mon Aug 1 20:09:13 2005
@@ -172,7 +172,7 @@
(**********************************************************************************)
(* taken from camomile *)
-(* $Id: charset.ml,v 1.4 2005/06/28 23:17:08 spiralvoice Exp $ *)
+(* $Id: charset.ml,v 1.5 2005/08/01 20:09:13 spiralvoice Exp $ *)
(* Copyright 2002, 2003 Yamagata Yoriyuki. distributed with LGPL *)
let utf8_look s i =
@@ -254,7 +254,7 @@
(**********************************************************************************)
(* taken from camomile *)
-(* $Id: charset.ml,v 1.4 2005/06/28 23:17:08 spiralvoice Exp $ *)
+(* $Id: charset.ml,v 1.5 2005/08/01 20:09:13 spiralvoice Exp $ *)
(* Copyright 2002, 2003 Yamagata Yoriyuki. distributed with LGPL *)
let rec length_aux s c i =
@@ -281,7 +281,7 @@
(* taken from camomile *)
-(* $Id: charset.ml,v 1.4 2005/06/28 23:17:08 spiralvoice Exp $ *)
+(* $Id: charset.ml,v 1.5 2005/08/01 20:09:13 spiralvoice Exp $ *)
(* Copyright 2002, 2003 Yamagata Yoriyuki. distributed with LGPL *)
external uint_code : uchar -> int = "%identity"
@@ -1655,8 +1655,6 @@
(Sys.Signal_handle (fun _ -> ())));
let s = charset_to_string locale in
- Printf.printf "Current locale of the target machine is %s\n" s;
- flush stdout;
s
let (enc_list : string list ref) = ref []
@@ -1666,8 +1664,6 @@
let default_language =
let s = get_default_language () in
let s = normalize_language s in
- Printf.printf "Current language of the target machine is %s\n" s;
- flush stdout;
s
(*
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Mldonkey-commits] Changes to mldonkey/src/utils/lib/charset.ml,
mldonkey-commits <=