In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/a841533b5cf319b34548d89671a3fe05f4f62beb?hp=d4c22fec77d7244882ce42a93a4ad25bdada2519>
- Log ----------------------------------------------------------------- commit a841533b5cf319b34548d89671a3fe05f4f62beb Author: Rafael Garcia-Suarez <[email protected]> Date: Wed Oct 14 11:40:35 2009 +0200 Remove old code dealing with installing 5.003's perldiag M installperl commit d30bfae6d91dda44e217fd3a3239656b169cfec8 Author: Rafael Garcia-Suarez <[email protected]> Date: Wed Oct 14 11:36:44 2009 +0200 Ignore files installed by Parse::CPAN::Meta M lib/.gitignore commit 4540f59a80659a16e527881ee79708395298a9ea Author: Rafael Garcia-Suarez <[email protected]> Date: Wed Oct 14 11:35:10 2009 +0200 Don't install uupacktool.pl M installperl ----------------------------------------------------------------------- Summary of changes: installperl | 17 +---------------- lib/.gitignore | 2 +- 2 files changed, 2 insertions(+), 17 deletions(-) diff --git a/installperl b/installperl index bfa5d48..4dbec21 100755 --- a/installperl +++ b/installperl @@ -565,21 +565,6 @@ my $pod = ($Is_Cygwin || $Is_Darwin || $Is_VMS || $Is_W32) ? 'pods' : 'pod'; if ( !$versiononly || ($installprivlib =~ m/\Q$vershort/)) { mkpath("${installprivlib}/$pod", $opts{verbose}, 0777); - # If Perl 5.003's perldiag.pod is there, rename it. - if (open POD, "${installprivlib}/$pod/perldiag.pod") { - read POD, $_, 4000; - close POD; - # Some of Perl 5.003's diagnostic messages ended with periods. - if (/^=.*\.$/m) { - my ($from, $to) = ("${installprivlib}/$pod/perldiag.pod", - "${installprivlib}/$pod/perldiag-5.003.pod"); - print " rename $from $to"; - rename($from, $to) - or warn "Couldn't rename $from to $to: $!\n" - unless $opts{notify}; - } - } - for (@pods) { # $_ is a name like pod/perl.pod (my $base = $_) =~ s#.*/##; @@ -716,7 +701,7 @@ sub installlib { # ignore patch backups, RCS files, emacs backup & temp files and the # .exists files, .PL files, and test files. - return if $name =~ m{\.orig$|\.rej$|~$|^#.+#$|,v$|^\.exists|\.PL$|\.plc$|\.t$|^test\.pl$|^dbm_filter_util\.pl$|^filter-util\.pl$|^\.gitignore$} || + return if $name =~ m{\.orig$|\.rej$|~$|^#.+#$|,v$|^\.exists|\.PL$|\.plc$|\.t$|^test\.pl$|^dbm_filter_util\.pl$|^filter-util\.pl$|^uupacktool\.pl$|^\.gitignore$} || $dir =~ m{/t(?:/|$)}; # ignore the cpan script in lib/CPAN/bin, the instmodsh and xsubpp # scripts in lib/ExtUtils, the prove script in lib/Test/Harness, diff --git a/lib/.gitignore b/lib/.gitignore index 158c9e2..b36be6f 100644 --- a/lib/.gitignore +++ b/lib/.gitignore @@ -289,7 +289,7 @@ /POSIX.pod /Package/Constants.pm /Params/Check.pm -/Parse/CPAN/Meta.pm +/Parse/CPAN/ /PerlIO/encoding.pm /PerlIO/scalar.pm /PerlIO/via.pm -- Perl5 Master Repository
