1
0
mirror of https://git.FreeBSD.org/ports.git synced 2024-10-22 20:41:26 +00:00

Copy BUILD_DEPENDS into RUN_DEPENDS

Fix problem with recently changed file:foo behaviour returning now /foo
This commit is contained in:
Andrey A. Chernov 2005-04-17 18:29:14 +00:00
parent e20e93f524
commit 1275f10a25
Notes: svn2git 2021-03-31 03:12:20 +00:00
svn path=/head/; revision=133536
4 changed files with 53 additions and 0 deletions

View File

@ -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

13
www/w3mir/files/patch-aa Normal file
View File

@ -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;

19
www/w3mir/files/patch-ab Normal file
View File

@ -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.

19
www/w3mir/files/patch-ac Normal file
View File

@ -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;