[Mldonkey-commits] Changes to mldonkey/src/utils/net/http_server.ml

[mldonkey-commits]

Index: mldonkey/src/utils/net/http_server.ml
diff -u mldonkey/src/utils/net/http_server.ml:1.19 
mldonkey/src/utils/net/http_server.ml:1.20
--- mldonkey/src/utils/net/http_server.ml:1.19  Fri Jul 22 10:58:55 2005
+++ mldonkey/src/utils/net/http_server.ml       Tue Jul 26 21:52:03 2005
@@ -234,7 +234,7 @@
       let fin_meth = String.index ans ' ' in
       let meth = String.sub ans 0 fin_meth in
       let fin_file = String.index_from ans (fin_meth + 1) ' ' in
-      let file = String.sub ans (fin_meth+1) (fin_file-fin_meth-1) in
+      let file = String.sub ans (fin_meth+2) (fin_file-fin_meth-2) in
       let version = match ans.[String.length ans - 1] with
           '0' -> HTTP1_0
         | '1' -> HTTP1_1