[Mldonkey-commits] Changes to mldonkey/src/networks/donkey/donkeyInteractive.ml

[mldonkey-commits]

Index: mldonkey/src/networks/donkey/donkeyInteractive.ml
diff -u mldonkey/src/networks/donkey/donkeyInteractive.ml:1.59 
mldonkey/src/networks/donkey/donkeyInteractive.ml:1.60
--- mldonkey/src/networks/donkey/donkeyInteractive.ml:1.59      Thu Sep  1 
00:04:12 2005
+++ mldonkey/src/networks/donkey/donkeyInteractive.ml   Tue Sep 13 09:54:47 2005
@@ -511,7 +511,7 @@
 
 
 let parse_donkey_url url =
-  match String2.split (String.escaped url) '|' with
+  match String2.split ((*String.escaped*) url) '|' with
 (* TODO RESULT *)
   | "ed2k://" :: "file" :: name :: size :: md4 :: _
   | "file" :: name :: size :: md4 :: _ ->
@@ -1211,7 +1211,7 @@
       html_mods_td buf [
         ("ed2k link", "sr br", "ed2k link");
         ("", "sr", Printf.sprintf "\\<a 
href=\\\"ed2k://|file|%s|%s|%s|/\\\"\\>ed2k://|file|%s|%s|%s|/\\</A\\>"
-            (file_best_name file)
+            (Url.encode (file_best_name file))
           (Int64.to_string (file_size file))
           (Md4.to_string file.file_md4)
           (file_best_name file)
@@ -1399,7 +1399,7 @@
   );
   file_ops.op_file_comment <- (fun file ->
       Printf.sprintf "ed2k://|file|%s|%Ld|%s|"
-        (file_best_name file)
+        (Url.encode (file_best_name file))
       (file_size file)
       (Md4.to_string file.file_md4)
   );