auto-import perl-5.8.0-50 from perl-5.8.0-50.src.rpm
This commit is contained in:
parent
44cd9e5579
commit
9adb30a55c
40
perl-5.8.0-links.patch
Normal file
40
perl-5.8.0-links.patch
Normal file
@ -0,0 +1,40 @@
|
|||||||
|
--- perl-5.8.0/lib/CPAN/FirstTime.pm.links 2002-08-15 14:58:47.000000000 -0400
|
||||||
|
+++ perl-5.8.0/lib/CPAN/FirstTime.pm 2002-08-15 14:59:07.000000000 -0400
|
||||||
|
@@ -258,7 +258,7 @@
|
||||||
|
my(@path) = split /$Config{'path_sep'}/, $ENV{'PATH'};
|
||||||
|
local $^W = $old_warn;
|
||||||
|
my $progname;
|
||||||
|
- for $progname (qw/gzip tar unzip make lynx wget ncftpget ncftp ftp/){
|
||||||
|
+ for $progname (qw/gzip tar unzip make links wget ncftpget ncftp ftp/){
|
||||||
|
if ($^O eq 'MacOS') {
|
||||||
|
$CPAN::Config->{$progname} = 'not_here';
|
||||||
|
next;
|
||||||
|
--- perl-5.8.0/lib/CPAN.pm.links 2002-08-15 14:58:37.000000000 -0400
|
||||||
|
+++ perl-5.8.0/lib/CPAN.pm 2002-08-15 15:00:08.000000000 -0400
|
||||||
|
@@ -2528,7 +2528,7 @@
|
||||||
|
|
||||||
|
$self->debug("localizing funkyftpwise[$url]") if $CPAN::DEBUG;
|
||||||
|
my($f,$funkyftp);
|
||||||
|
- for $f ('lynx','ncftpget','ncftp','wget') {
|
||||||
|
+ for $f ('links','ncftpget','ncftp','wget') {
|
||||||
|
next unless exists $CPAN::Config->{$f};
|
||||||
|
$funkyftp = $CPAN::Config->{$f};
|
||||||
|
next unless defined $funkyftp;
|
||||||
|
@@ -2537,7 +2537,7 @@
|
||||||
|
($asl_ungz = $aslocal) =~ s/\.gz//;
|
||||||
|
$asl_gz = "$asl_ungz.gz";
|
||||||
|
my($src_switch) = "";
|
||||||
|
- if ($f eq "lynx"){
|
||||||
|
+ if ($f eq "links"){
|
||||||
|
$src_switch = " -source";
|
||||||
|
} elsif ($f eq "ncftp"){
|
||||||
|
$src_switch = " -c";
|
||||||
|
@@ -2561,7 +2561,7 @@
|
||||||
|
my($wstatus);
|
||||||
|
if (($wstatus = system($system)) == 0
|
||||||
|
&&
|
||||||
|
- ($f eq "lynx" ?
|
||||||
|
+ ($f eq "links" ?
|
||||||
|
-s $asl_ungz # lynx returns 0 when it fails somewhere
|
||||||
|
: 1
|
||||||
|
)
|
@ -3,7 +3,7 @@
|
|||||||
%define suidperl 1
|
%define suidperl 1
|
||||||
|
|
||||||
%define perlver 5.8.0
|
%define perlver 5.8.0
|
||||||
%define perlrel 49
|
%define perlrel 50
|
||||||
%define perlepoch 2
|
%define perlepoch 2
|
||||||
%define cpanver 1.61
|
%define cpanver 1.61
|
||||||
%define dbfilever 1.804
|
%define dbfilever 1.804
|
||||||
@ -87,6 +87,9 @@ Patch17: perl-5.8.0-sharedlinker.patch
|
|||||||
# perl 5.8.0 likes to use man3ext for BOTH directories AND files. not kosher.
|
# perl 5.8.0 likes to use man3ext for BOTH directories AND files. not kosher.
|
||||||
Patch18: perl-5.8.0-manext.patch
|
Patch18: perl-5.8.0-manext.patch
|
||||||
|
|
||||||
|
# lynx is depracated, use links instead
|
||||||
|
Patch19: perl-5.8.0-links.patch
|
||||||
|
|
||||||
Buildroot: %{_tmppath}/%{name}-root
|
Buildroot: %{_tmppath}/%{name}-root
|
||||||
BuildRequires: gawk, grep, tcsh
|
BuildRequires: gawk, grep, tcsh
|
||||||
|
|
||||||
@ -230,6 +233,7 @@ more secure running of setuid perl scripts.
|
|||||||
%patch17 -p1 -b .sharedlinker
|
%patch17 -p1 -b .sharedlinker
|
||||||
|
|
||||||
%patch18 -p1 -b .manext
|
%patch18 -p1 -b .manext
|
||||||
|
%patch19 -p1 -b .links
|
||||||
|
|
||||||
find . -name \*.orig -exec rm -fv {} \;
|
find . -name \*.orig -exec rm -fv {} \;
|
||||||
|
|
||||||
@ -378,6 +382,9 @@ find $RPM_BUILD_ROOT%{_libdir}/perl* -name .packlist -o -name perllocal.pod | \
|
|||||||
%endif
|
%endif
|
||||||
|
|
||||||
%changelog
|
%changelog
|
||||||
|
* Thu Aug 15 2002 Chip Turner <cturner@redhat.com>
|
||||||
|
- change from lynx to links in CPAN.pm
|
||||||
|
|
||||||
* Tue Aug 6 2002 Chip Turner <cturner@redhat.com>
|
* Tue Aug 6 2002 Chip Turner <cturner@redhat.com>
|
||||||
- automated release bump and build
|
- automated release bump and build
|
||||||
- remove Filter packages and use CPAN ones
|
- remove Filter packages and use CPAN ones
|
||||||
|
Loading…
Reference in New Issue
Block a user