[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Mldonkey-commits] Changes to mldonkey/src/networks/fileTP/fileTPHTTP.ml
From: |
mldonkey-commits |
Subject: |
[Mldonkey-commits] Changes to mldonkey/src/networks/fileTP/fileTPHTTP.ml |
Date: |
Tue, 06 Dec 2005 15:26:42 -0500 |
Index: mldonkey/src/networks/fileTP/fileTPHTTP.ml
diff -u mldonkey/src/networks/fileTP/fileTPHTTP.ml:1.16
mldonkey/src/networks/fileTP/fileTPHTTP.ml:1.17
--- mldonkey/src/networks/fileTP/fileTPHTTP.ml:1.16 Sun Dec 4 15:22:43 2005
+++ mldonkey/src/networks/fileTP/fileTPHTTP.ml Tue Dec 6 20:26:40 2005
@@ -64,6 +64,10 @@
let http_send_range_request c range sock d =
let url = d.download_url in
+
+ let real_url =
+ (Str.global_replace (Str.regexp " ") "%20" url.Url.full_file) in
+
let referer = d.download_referer in
let (x,y) = range in
@@ -71,7 +75,7 @@
let buf = Buffer.create 100 in
- Printf.bprintf buf "GET %s HTTP/1.0\r\n" url.Url.full_file;
+ Printf.bprintf buf "GET %s HTTP/1.0\r\n" real_url;
(*
(match d.download_uri with