mirror/freebsd-ports
1
0
Fork 0
mirror of https://git.FreeBSD.org/ports.git synced 2025-01-16 07:58:04 +00:00
Code Issues Releases Activity

Update "perl-after-upgrade": set correct perl package name in @pkgdep.

Browse Source
This commit is contained in:
Sergey Skvortsov 2009-03-13 13:04:09 +00:00
parent 5ad894e3a5
commit 1d9fd744c1
Notes: svn2git 2021-03-31 03:12:20 +00:00 
svn path=/head/; revision=229989
10 changed files with 25 additions and 230 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lang/perl5.10/Makefile
View File

@ -154,7 +154,7 @@ post-patch:
-e 's|%%MAKE_CONF%%|${__MAKE_CONF}|g;' \
${FILESDIR}/use.perl \
> ${WRKDIR}/use.perl
${SED} -e 's|%%PERL%%|${PERL}|g;' \
${SED} -e 's|%%PERL%%|${PERL}|g; s|%%PERL_VERSION%%|${PERL_VERSION}|g; s|%%PKGNAME%%|${PKGNAME}|g' \
${FILESDIR}/perl-after-upgrade \
> ${WRKDIR}/perl-after-upgrade
${CP} ${WRKDIR}/use.perl ${PKGINSTALL}

49
lang/perl5.10/files/perl-after-upgrade
View File

@ -23,7 +23,7 @@ perl-after-upgrade -- fixup FreeBSD packages that depend on perl
=head1 DESCRIPTION
The standard procedure after a perl port (either lang/perl5 or
The standard procedure after a perl port (either lang/perl5.6 or
lang/perl5.8) upgrade is to basically reinstall all other packages that
depend on perl. This is always a painful exercise. The
perl-after-upgrade utility makes this process mostly unnecessary.
@ -217,7 +217,6 @@ sub reset
}
package main;
use Config;
use File::Temp qw/tempfile/;
use File::Copy;
@ -248,48 +247,8 @@ while (@ARGV) {
}
}
my $target =
$Config::Config{PERL_REVISION} . "." .
$Config::Config{PERL_VERSION} . "." .
$Config::Config{PERL_SUBVERSION};
my $source = "";
my $api_revision = $Config::Config{api_revision} || 0;
my $api_version = $Config::Config{api_version} || 0;
my $api_subversion = $Config::Config{api_subversion} || 0;
if ($api_revision < $Config::Config{PERL_REVISION}) {
$source = ".[";
for ($api_revision .. $Config::Config{PERL_REVISION}) {
$source .= $_;
}
$source .= "]\\.\\d+\\.\\d+";
} elsif ($api_revision > $Config::Config{PERL_REVISION}) {
die "internal error, this perl is too old\n";
} else {
$source .= "$Config::Config{PERL_REVISION}\\.";
if ($api_version < $Config::Config{PERL_VERSION}) {
$source .= "[";
for ($api_version .. $Config::Config{PERL_VERSION}) {
$source .= $_;
}
$source .= "]\\.\\d+";
} elsif ($api_version > $Config::Config{PERL_VERSION}) {
die "internal error, this perl is too old\n";
} else {
$source .= "$Config::Config{PERL_VERSION}\\.";
if ($api_subversion < $Config::Config{PERL_SUBVERSION}) {
$source .= "[";
for ($api_subversion .. $Config::Config{PERL_SUBVERSION}) {
$source .= $_;
}
$source .= "]";
} elsif ($api_subversion > $Config::Config{PERL_SUBVERSION}) {
die "internal error, this perl is too old\n";
} else {
$source .= "$Config::Config{PERL_SUBVERSION}\\.";
}
}
}
print STDERR "- Source re: <$source>\n" if $debug;
my $target = '%%PERL_VERSION%%';
my $new_perl_pkgname = '%%PKGNAME%%';
my $fuzzy_source = "5\\.[\\d._]+";
print STDERR "- Fuzzy source re: <$fuzzy_source>\n" if $debug;
@ -584,7 +543,7 @@ while (my $pkg = $db->next) {
} elsif (/^\@pkgdep\s+perl-(threaded-)?($fuzzy_source)\S*\s*$/) {
if ($target ne $2) {
my $perlver = $2;
s|perl-(threaded-)?\Q$perlver\E|perl-$target|;
s|perl-(threaded-)?\Q$perlver\E|$new_perl_pkgname|;
}
}
my $old = $_;

2
lang/perl5.12/Makefile
View File

@ -154,7 +154,7 @@ post-patch:
-e 's|%%MAKE_CONF%%|${__MAKE_CONF}|g;' \
${FILESDIR}/use.perl \
> ${WRKDIR}/use.perl
${SED} -e 's|%%PERL%%|${PERL}|g;' \
${SED} -e 's|%%PERL%%|${PERL}|g; s|%%PERL_VERSION%%|${PERL_VERSION}|g; s|%%PKGNAME%%|${PKGNAME}|g' \
${FILESDIR}/perl-after-upgrade \
> ${WRKDIR}/perl-after-upgrade
${CP} ${WRKDIR}/use.perl ${PKGINSTALL}

49
lang/perl5.12/files/perl-after-upgrade
View File

@ -23,7 +23,7 @@ perl-after-upgrade -- fixup FreeBSD packages that depend on perl
=head1 DESCRIPTION
The standard procedure after a perl port (either lang/perl5 or
The standard procedure after a perl port (either lang/perl5.6 or
lang/perl5.8) upgrade is to basically reinstall all other packages that
depend on perl. This is always a painful exercise. The
perl-after-upgrade utility makes this process mostly unnecessary.
@ -217,7 +217,6 @@ sub reset
}
package main;
use Config;
use File::Temp qw/tempfile/;
use File::Copy;
@ -248,48 +247,8 @@ while (@ARGV) {
}
}
my $target =
$Config::Config{PERL_REVISION} . "." .
$Config::Config{PERL_VERSION} . "." .
$Config::Config{PERL_SUBVERSION};
my $source = "";
my $api_revision = $Config::Config{api_revision} || 0;
my $api_version = $Config::Config{api_version} || 0;
my $api_subversion = $Config::Config{api_subversion} || 0;
if ($api_revision < $Config::Config{PERL_REVISION}) {
$source = ".[";
for ($api_revision .. $Config::Config{PERL_REVISION}) {
$source .= $_;
}
$source .= "]\\.\\d+\\.\\d+";
} elsif ($api_revision > $Config::Config{PERL_REVISION}) {
die "internal error, this perl is too old\n";
} else {
$source .= "$Config::Config{PERL_REVISION}\\.";
if ($api_version < $Config::Config{PERL_VERSION}) {
$source .= "[";
for ($api_version .. $Config::Config{PERL_VERSION}) {
$source .= $_;
}
$source .= "]\\.\\d+";
} elsif ($api_version > $Config::Config{PERL_VERSION}) {
die "internal error, this perl is too old\n";
} else {
$source .= "$Config::Config{PERL_VERSION}\\.";
if ($api_subversion < $Config::Config{PERL_SUBVERSION}) {
$source .= "[";
for ($api_subversion .. $Config::Config{PERL_SUBVERSION}) {
$source .= $_;
}
$source .= "]";
} elsif ($api_subversion > $Config::Config{PERL_SUBVERSION}) {
die "internal error, this perl is too old\n";
} else {
$source .= "$Config::Config{PERL_SUBVERSION}\\.";
}
}
}
print STDERR "- Source re: <$source>\n" if $debug;
my $target = '%%PERL_VERSION%%';
my $new_perl_pkgname = '%%PKGNAME%%';
my $fuzzy_source = "5\\.[\\d._]+";
print STDERR "- Fuzzy source re: <$fuzzy_source>\n" if $debug;
@ -584,7 +543,7 @@ while (my $pkg = $db->next) {
} elsif (/^\@pkgdep\s+perl-(threaded-)?($fuzzy_source)\S*\s*$/) {
if ($target ne $2) {
my $perlver = $2;
s|perl-(threaded-)?\Q$perlver\E|perl-$target|;
s|perl-(threaded-)?\Q$perlver\E|$new_perl_pkgname|;
}
}
my $old = $_;

2
lang/perl5.14/Makefile
View File

@ -154,7 +154,7 @@ post-patch:
-e 's|%%MAKE_CONF%%|${__MAKE_CONF}|g;' \
${FILESDIR}/use.perl \
> ${WRKDIR}/use.perl
${SED} -e 's|%%PERL%%|${PERL}|g;' \
${SED} -e 's|%%PERL%%|${PERL}|g; s|%%PERL_VERSION%%|${PERL_VERSION}|g; s|%%PKGNAME%%|${PKGNAME}|g' \
${FILESDIR}/perl-after-upgrade \
> ${WRKDIR}/perl-after-upgrade
${CP} ${WRKDIR}/use.perl ${PKGINSTALL}

49
lang/perl5.14/files/perl-after-upgrade
View File

@ -23,7 +23,7 @@ perl-after-upgrade -- fixup FreeBSD packages that depend on perl
=head1 DESCRIPTION
The standard procedure after a perl port (either lang/perl5 or
The standard procedure after a perl port (either lang/perl5.6 or
lang/perl5.8) upgrade is to basically reinstall all other packages that
depend on perl. This is always a painful exercise. The
perl-after-upgrade utility makes this process mostly unnecessary.
@ -217,7 +217,6 @@ sub reset
}
package main;
use Config;
use File::Temp qw/tempfile/;
use File::Copy;
@ -248,48 +247,8 @@ while (@ARGV) {
}
}
my $target =
$Config::Config{PERL_REVISION} . "." .
$Config::Config{PERL_VERSION} . "." .
$Config::Config{PERL_SUBVERSION};
my $source = "";
my $api_revision = $Config::Config{api_revision} || 0;
my $api_version = $Config::Config{api_version} || 0;
my $api_subversion = $Config::Config{api_subversion} || 0;
if ($api_revision < $Config::Config{PERL_REVISION}) {
$source = ".[";
for ($api_revision .. $Config::Config{PERL_REVISION}) {
$source .= $_;
}
$source .= "]\\.\\d+\\.\\d+";
} elsif ($api_revision > $Config::Config{PERL_REVISION}) {
die "internal error, this perl is too old\n";
} else {
$source .= "$Config::Config{PERL_REVISION}\\.";
if ($api_version < $Config::Config{PERL_VERSION}) {
$source .= "[";
for ($api_version .. $Config::Config{PERL_VERSION}) {
$source .= $_;
}
$source .= "]\\.\\d+";
} elsif ($api_version > $Config::Config{PERL_VERSION}) {
die "internal error, this perl is too old\n";
} else {
$source .= "$Config::Config{PERL_VERSION}\\.";
if ($api_subversion < $Config::Config{PERL_SUBVERSION}) {
$source .= "[";
for ($api_subversion .. $Config::Config{PERL_SUBVERSION}) {
$source .= $_;
}
$source .= "]";
} elsif ($api_subversion > $Config::Config{PERL_SUBVERSION}) {
die "internal error, this perl is too old\n";
} else {
$source .= "$Config::Config{PERL_SUBVERSION}\\.";
}
}
}
print STDERR "- Source re: <$source>\n" if $debug;
my $target = '%%PERL_VERSION%%';
my $new_perl_pkgname = '%%PKGNAME%%';
my $fuzzy_source = "5\\.[\\d._]+";
print STDERR "- Fuzzy source re: <$fuzzy_source>\n" if $debug;
@ -584,7 +543,7 @@ while (my $pkg = $db->next) {
} elsif (/^\@pkgdep\s+perl-(threaded-)?($fuzzy_source)\S*\s*$/) {
if ($target ne $2) {
my $perlver = $2;
s|perl-(threaded-)?\Q$perlver\E|perl-$target|;
s|perl-(threaded-)?\Q$perlver\E|$new_perl_pkgname|;
}
}
my $old = $_;

2
lang/perl5.16/Makefile
View File

@ -154,7 +154,7 @@ post-patch:
-e 's|%%MAKE_CONF%%|${__MAKE_CONF}|g;' \
${FILESDIR}/use.perl \
> ${WRKDIR}/use.perl
${SED} -e 's|%%PERL%%|${PERL}|g;' \
${SED} -e 's|%%PERL%%|${PERL}|g; s|%%PERL_VERSION%%|${PERL_VERSION}|g; s|%%PKGNAME%%|${PKGNAME}|g' \
${FILESDIR}/perl-after-upgrade \
> ${WRKDIR}/perl-after-upgrade
${CP} ${WRKDIR}/use.perl ${PKGINSTALL}

49
lang/perl5.16/files/perl-after-upgrade
View File

@ -23,7 +23,7 @@ perl-after-upgrade -- fixup FreeBSD packages that depend on perl
=head1 DESCRIPTION
The standard procedure after a perl port (either lang/perl5 or
The standard procedure after a perl port (either lang/perl5.6 or
lang/perl5.8) upgrade is to basically reinstall all other packages that
depend on perl. This is always a painful exercise. The
perl-after-upgrade utility makes this process mostly unnecessary.
@ -217,7 +217,6 @@ sub reset
}
package main;
use Config;
use File::Temp qw/tempfile/;
use File::Copy;
@ -248,48 +247,8 @@ while (@ARGV) {
}
}
my $target =
$Config::Config{PERL_REVISION} . "." .
$Config::Config{PERL_VERSION} . "." .
$Config::Config{PERL_SUBVERSION};
my $source = "";
my $api_revision = $Config::Config{api_revision} || 0;
my $api_version = $Config::Config{api_version} || 0;
my $api_subversion = $Config::Config{api_subversion} || 0;
if ($api_revision < $Config::Config{PERL_REVISION}) {
$source = ".[";
for ($api_revision .. $Config::Config{PERL_REVISION}) {
$source .= $_;
}
$source .= "]\\.\\d+\\.\\d+";
} elsif ($api_revision > $Config::Config{PERL_REVISION}) {
die "internal error, this perl is too old\n";
} else {
$source .= "$Config::Config{PERL_REVISION}\\.";
if ($api_version < $Config::Config{PERL_VERSION}) {
$source .= "[";
for ($api_version .. $Config::Config{PERL_VERSION}) {
$source .= $_;
}
$source .= "]\\.\\d+";
} elsif ($api_version > $Config::Config{PERL_VERSION}) {
die "internal error, this perl is too old\n";
} else {
$source .= "$Config::Config{PERL_VERSION}\\.";
if ($api_subversion < $Config::Config{PERL_SUBVERSION}) {
$source .= "[";
for ($api_subversion .. $Config::Config{PERL_SUBVERSION}) {
$source .= $_;
}
$source .= "]";
} elsif ($api_subversion > $Config::Config{PERL_SUBVERSION}) {
die "internal error, this perl is too old\n";
} else {
$source .= "$Config::Config{PERL_SUBVERSION}\\.";
}
}
}
print STDERR "- Source re: <$source>\n" if $debug;
my $target = '%%PERL_VERSION%%';
my $new_perl_pkgname = '%%PKGNAME%%';
my $fuzzy_source = "5\\.[\\d._]+";
print STDERR "- Fuzzy source re: <$fuzzy_source>\n" if $debug;
@ -584,7 +543,7 @@ while (my $pkg = $db->next) {
} elsif (/^\@pkgdep\s+perl-(threaded-)?($fuzzy_source)\S*\s*$/) {
if ($target ne $2) {
my $perlver = $2;
s|perl-(threaded-)?\Q$perlver\E|perl-$target|;
s|perl-(threaded-)?\Q$perlver\E|$new_perl_pkgname|;
}
}
my $old = $_;

2
lang/perl5.8/Makefile
View File

@ -154,7 +154,7 @@ post-patch:
-e 's|%%MAKE_CONF%%|${__MAKE_CONF}|g;' \
${FILESDIR}/use.perl \
> ${WRKDIR}/use.perl
${SED} -e 's|%%PERL%%|${PERL}|g;' \
${SED} -e 's|%%PERL%%|${PERL}|g; s|%%PERL_VERSION%%|${PERL_VERSION}|g; s|%%PKGNAME%%|${PKGNAME}|g' \
${FILESDIR}/perl-after-upgrade \
> ${WRKDIR}/perl-after-upgrade
${CP} ${WRKDIR}/use.perl ${PKGINSTALL}

49
lang/perl5.8/files/perl-after-upgrade
View File

@ -23,7 +23,7 @@ perl-after-upgrade -- fixup FreeBSD packages that depend on perl
=head1 DESCRIPTION
The standard procedure after a perl port (either lang/perl5 or
The standard procedure after a perl port (either lang/perl5.6 or
lang/perl5.8) upgrade is to basically reinstall all other packages that
depend on perl. This is always a painful exercise. The
perl-after-upgrade utility makes this process mostly unnecessary.
@ -217,7 +217,6 @@ sub reset
}
package main;
use Config;
use File::Temp qw/tempfile/;
use File::Copy;
@ -248,48 +247,8 @@ while (@ARGV) {
}
}
my $target =
$Config::Config{PERL_REVISION} . "." .
$Config::Config{PERL_VERSION} . "." .
$Config::Config{PERL_SUBVERSION};
my $source = "";
my $api_revision = $Config::Config{api_revision} || 0;
my $api_version = $Config::Config{api_version} || 0;
my $api_subversion = $Config::Config{api_subversion} || 0;
if ($api_revision < $Config::Config{PERL_REVISION}) {
$source = ".[";
for ($api_revision .. $Config::Config{PERL_REVISION}) {
$source .= $_;
}
$source .= "]\\.\\d+\\.\\d+";
} elsif ($api_revision > $Config::Config{PERL_REVISION}) {
die "internal error, this perl is too old\n";
} else {
$source .= "$Config::Config{PERL_REVISION}\\.";
if ($api_version < $Config::Config{PERL_VERSION}) {
$source .= "[";
for ($api_version .. $Config::Config{PERL_VERSION}) {
$source .= $_;
}
$source .= "]\\.\\d+";
} elsif ($api_version > $Config::Config{PERL_VERSION}) {
die "internal error, this perl is too old\n";
} else {
$source .= "$Config::Config{PERL_VERSION}\\.";
if ($api_subversion < $Config::Config{PERL_SUBVERSION}) {
$source .= "[";
for ($api_subversion .. $Config::Config{PERL_SUBVERSION}) {
$source .= $_;
}
$source .= "]";
} elsif ($api_subversion > $Config::Config{PERL_SUBVERSION}) {
die "internal error, this perl is too old\n";
} else {
$source .= "$Config::Config{PERL_SUBVERSION}\\.";
}
}
}
print STDERR "- Source re: <$source>\n" if $debug;
my $target = '%%PERL_VERSION%%';
my $new_perl_pkgname = '%%PKGNAME%%';
my $fuzzy_source = "5\\.[\\d._]+";
print STDERR "- Fuzzy source re: <$fuzzy_source>\n" if $debug;
@ -584,7 +543,7 @@ while (my $pkg = $db->next) {
} elsif (/^\@pkgdep\s+perl-(threaded-)?($fuzzy_source)\S*\s*$/) {
if ($target ne $2) {
my $perlver = $2;
s|perl-(threaded-)?\Q$perlver\E|perl-$target|;
s|perl-(threaded-)?\Q$perlver\E|$new_perl_pkgname|;
}
}
my $old = $_;