diff options
| author | lioux <lioux@FreeBSD.org> | 2005-01-31 10:47:22 +0800 |
|---|---|---|
| committer | lioux <lioux@FreeBSD.org> | 2005-01-31 10:47:22 +0800 |
| commit | 5ae219d33a8c5ac72023db425b5cfb56e9c4a6e3 (patch) | |
| tree | fb24d0936071214ae04e2608a5845f90a755e5c5 /net-p2p/mldonkey-devel | |
| parent | 498f299e0147d70060acb4345993faf40550ac97 (diff) | |
| download | freebsd-ports-gnome-5ae219d33a8c5ac72023db425b5cfb56e9c4a6e3.tar.gz freebsd-ports-gnome-5ae219d33a8c5ac72023db425b5cfb56e9c4a6e3.tar.zst freebsd-ports-gnome-5ae219d33a8c5ac72023db425b5cfb56e9c4a6e3.zip | |
o Fix patch #3676 from patch kit p with patch [2] from [1]: BT/fileTP
HTTP header check
[1] http://savannah.nongnu.org/patch/?func=detailitem&item_id=3676
[2] file 3676_2-fix.patch
o Bump PORTREVISION
Diffstat (limited to 'net-p2p/mldonkey-devel')
| -rw-r--r-- | net-p2p/mldonkey-devel/Makefile | 2 | ||||
| -rw-r--r-- | net-p2p/mldonkey-devel/files/patch-src::networks::fileTP::fileTPInteractive.ml | 18 |
2 files changed, 19 insertions, 1 deletions
diff --git a/net-p2p/mldonkey-devel/Makefile b/net-p2p/mldonkey-devel/Makefile index a81d381fe273..0f7fce27a254 100644 --- a/net-p2p/mldonkey-devel/Makefile +++ b/net-p2p/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-p2p/mldonkey-devel/files/patch-src::networks::fileTP::fileTPInteractive.ml b/net-p2p/mldonkey-devel/files/patch-src::networks::fileTP::fileTPInteractive.ml new file mode 100644 index 000000000000..f799021ca7bb --- /dev/null +++ b/net-p2p/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 |