From 1275f10a25da3d067269fe769f53ab6b5ed2606c Mon Sep 17 00:00:00 2001
From: "Andrey A. Chernov" <ache@FreeBSD.org>
Date: Sun, 17 Apr 2005 18:29:14 +0000
Subject: Copy BUILD_DEPENDS into RUN_DEPENDS Fix problem with recently changed
 file:foo behaviour returning now /foo

---
 www/w3mir/Makefile       |  2 ++
 www/w3mir/files/patch-aa | 13 +++++++++++++
 www/w3mir/files/patch-ab | 19 +++++++++++++++++++
 www/w3mir/files/patch-ac | 19 +++++++++++++++++++
 4 files changed, 53 insertions(+)
 create mode 100644 www/w3mir/files/patch-aa
 create mode 100644 www/w3mir/files/patch-ab
 create mode 100644 www/w3mir/files/patch-ac

(limited to 'www/w3mir')

diff --git a/www/w3mir/Makefile b/www/w3mir/Makefile
index b72e3ab6ad0d..417504233b7b 100644
--- a/www/w3mir/Makefile
+++ b/www/w3mir/Makefile
@@ -7,6 +7,7 @@
 
 PORTNAME=	w3mir
 PORTVERSION=    1.0.10
+PORTREVISION=	1
 CATEGORIES=	www perl5
 MASTER_SITES=   http://langfeldt.net/w3mir/
 
@@ -14,6 +15,7 @@ MAINTAINER=	ache@freebsd.org
 COMMENT=	All-purpose HTTP copying and mirroring tool
 
 BUILD_DEPENDS=	${SITE_PERL}/LWP.pm:${PORTSDIR}/www/p5-libwww
+RUN_DEPENDS=	${BUILD_DEPENDS}
 
 USE_PERL5=	yes
 
diff --git a/www/w3mir/files/patch-aa b/www/w3mir/files/patch-aa
new file mode 100644
index 000000000000..5c64be77bbd7
--- /dev/null
+++ b/www/w3mir/files/patch-aa
@@ -0,0 +1,13 @@
+--- w3mir.PL.orig	Mon Feb  5 00:21:47 2001
++++ w3mir.PL	Sun Apr 17 21:43:30 2005
+@@ -648,8 +648,10 @@
+   $rum_url_o = url $rum_url_o 
+     unless ref $rum_url_o;
+   
++  my($slash)=($lf_url =~ /^\//);
+   # Derive a filename from the url, the filename contains no URL-quoting
+   my($lf_name) = (url "file:$lf_url")->unix_path;
++  $lf_name =~ s~^/~~ if (!$slash);
+ 
+   # Make all intermediate directories
+   &mkdir($lf_name) if $s==0;
diff --git a/www/w3mir/files/patch-ab b/www/w3mir/files/patch-ab
new file mode 100644
index 000000000000..58af17e12776
--- /dev/null
+++ b/www/w3mir/files/patch-ab
@@ -0,0 +1,19 @@
+--- w3http.pm.bak	Mon Feb  5 00:21:47 2001
++++ w3http.pm	Sun Apr 17 21:43:30 2005
+@@ -551,13 +551,16 @@
+       # found at cool sites.
+       $save=1;
+ 
++      my($slash)=($saveto =~ /^\//);
+       # Find a temporary filename
+       $tmpf=url "file:$saveto";
+       $tmpf->basename($tmpfile);
+       $tmpf=$tmpf->unix_path;
++      $tmpf =~ s~^/~~ if (!$slash);
+       
+       # Find suitable final filename, one with no URL escapes
+       $saveto=(url "file:$saveto")->unix_path;
++      $saveto =~ s~^/~~ if (!$slash);
+ 
+       # If output to stdout then send it directly there rather than
+       # using disk unnecesarily.
diff --git a/www/w3mir/files/patch-ac b/www/w3mir/files/patch-ac
new file mode 100644
index 000000000000..6094ed3f2c4a
--- /dev/null
+++ b/www/w3mir/files/patch-ac
@@ -0,0 +1,19 @@
+--- w3mfix.PL.bak	Mon Feb  5 00:21:47 2001
++++ w3mfix.PL	Sun Apr 17 21:56:24 2005
+@@ -686,12 +686,15 @@
+ 
+ 	substr($lf_url,0,0)='./' unless substr($lf_url,0,1) eq '/';
+ 
++	my($slash)=($lf_url =~ /^\//);
+ 	$lf_url_o=url $lf_url;
+ 	my $tmp=$lf_url_o->clone;
+ 	$tmp->basename($indexname);
++	my($tpath)=$tmp->unix_path;
++	$tpath =~ s~^/~~ if (!$slash);
+ 
+ 	if ( $doindex && $lf_url_o->basename eq "" && 
+-	     &stat($tmp->unix_path) eq 'f' &&
++	     &stat($tpath) eq 'f' &&
+ 	     !$htmlop::isdir{$key}) {
+ 	  $lf_url_o=$tmp;
+ 	  $il=1;
-- 
cgit v1.2.3