diff options
author | Mario Sergio Fujikawa Ferreira <lioux@FreeBSD.org> | 2005-01-31 02:47:22 +0000 |
---|---|---|
committer | Mario Sergio Fujikawa Ferreira <lioux@FreeBSD.org> | 2005-01-31 02:47:22 +0000 |
commit | 43a47aa8819977b8364ee0a619dcb92a838b4cba (patch) | |
tree | 5b46d00dc99d4927e8e89ec35ea78232cd3d1b43 /net | |
parent | f5c3602bd659351d9f2d681dd4c7d4c064bb8480 (diff) | |
download | ports-43a47aa8819977b8364ee0a619dcb92a838b4cba.tar.gz ports-43a47aa8819977b8364ee0a619dcb92a838b4cba.zip |
Notes
Diffstat (limited to 'net')
-rw-r--r-- | net/mldonkey-devel/Makefile | 2 | ||||
-rw-r--r-- | net/mldonkey-devel/files/patch-src::networks::fileTP::fileTPInteractive.ml | 18 |
2 files changed, 19 insertions, 1 deletions
diff --git a/net/mldonkey-devel/Makefile b/net/mldonkey-devel/Makefile index a81d381fe273..0f7fce27a254 100644 --- a/net/mldonkey-devel/Makefile +++ b/net/mldonkey-devel/Makefile @@ -7,7 +7,7 @@ PORTNAME= mldonkey PORTVERSION= 2.5.28.p -PORTREVISION= 1 +PORTREVISION= 2 CATEGORIES+= net MASTER_SITES= http://download.berlios.de/pub/mldonkey/spiralvoice/cvs/ PKGNAMESUFFIX= -devel diff --git a/net/mldonkey-devel/files/patch-src::networks::fileTP::fileTPInteractive.ml b/net/mldonkey-devel/files/patch-src::networks::fileTP::fileTPInteractive.ml new file mode 100644 index 000000000000..f799021ca7bb --- /dev/null +++ b/net/mldonkey-devel/files/patch-src::networks::fileTP::fileTPInteractive.ml @@ -0,0 +1,18 @@ +--- src/networks/fileTP/fileTPInteractive.ml.orig Mon Jan 31 00:29:00 2005 ++++ src/networks/fileTP/fileTPInteractive.ml Mon Jan 31 00:32:08 2005 +@@ -354,13 +354,13 @@ + + let rec op_network_parse_url url = + lprintf "filetp.op_network_parse_url\n"; +- let location_regexp = "Location: \([^\n]+\)\n" in ++ let location_regexp = "Location: \\(.*\\)" in + let real_url = get_regexp_string url (Str.regexp location_regexp) in + lprintf "real url: %s\n" real_url; + if (is_http_torrent url real_url) then false else + if (String2.check_prefix real_url "http://") then ( + lprintf "http download\n"; +- let length_regexp = "Content-Length: \([0-9]+\)\n" in ++ let length_regexp = "Content-Length: \\(.*\\)" in + try let length = get_regexp_int url (Str.regexp length_regexp) in + if (length > 0) then begin + download_file real_url; true |