[perl.git] branch blead, updated. GitLive-blead-2538-g1f809cd

[Jesse Vincent]

In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/1f809cd97bf47a6b00da9eb4f01af6a6b1368389?hp=63377b8da2054ffc5c248cb3d1cfdfd4f13f1c9f>

- Log -----------------------------------------------------------------
commit 1f809cd97bf47a6b00da9eb4f01af6a6b1368389
Author: Jesse Vincent <***@bestpractical.com>
Date: Thu Oct 1 01:06:49 2009 +0900

First steps to making corelist.pl understand the new world order
-----------------------------------------------------------------------

Summary of changes:
Porting/corelist.pl | 6 ++++--
1 files changed, 4 insertions(+), 2 deletions(-)

diff --git a/Porting/corelist.pl b/Porting/corelist.pl
index 4bd71e9..2423280 100644
--- a/Porting/corelist.pl
+++ b/Porting/corelist.pl
@@ -17,7 +17,7 @@ use Maintainers qw(%Modules files_to_modules);
use File::Spec;
use Parse::CPAN::Meta;

-my $corelist_file = 'ext/Module-CoreList/lib/Module/CoreList.pm';
+my $corelist_file = 'dist/Module-CoreList/lib/Module/CoreList.pm';

my %lines;
my %module_to_file;
@@ -78,13 +78,14 @@ find(
/(\.pm|_pm\.PL)$/ or return;
/PPPort\.pm$/ and return;
my $module = $File::Find::name;
+ warn $module;
$module =~ /\b(demo|t|private)\b/ and return; # demo or test modules
my $version = MM->parse_version($_);
defined $version or $version = 'undef';
$version =~ /\d/ and $version = "'$version'";

# some heuristics to figure out the module name from the file name
- $module =~ s{^(lib|(win32/|vms/|symbian/)?ext)/}{}
+ $module =~ s{^(lib|dist|(win32/|vms/|symbian/)?ext)/}{}
and $1 ne 'lib'
and (
$module =~ s{\b(\w+)/\1\b}{$1},
@@ -104,6 +105,7 @@ find(
},
'lib',
'ext',
+ 'dist',
'vms/ext',
'symbian/ext'
);

--
Perl5 Master Repository

[Steve Hay]

Post by Jesse Vincent
In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/1f809cd97bf47a6b00da9eb4

Post by Jesse Vincent
f01af6a6b1368389?hp=63377b8da2054ffc5c248cb3d1cfdfd4f13f1c9f>
- Log

-----------------------------------------------------------------

Post by Jesse Vincent
commit 1f809cd97bf47a6b00da9eb4f01af6a6b1368389
Date: Thu Oct 1 01:06:49 2009 +0900
First steps to making corelist.pl understand the new world order

-----------------------------------------------------------------------

Post by Jesse Vincent
- $module =~ s{^(lib|(win32/|vms/|symbian/)?ext)/}{}
+ $module =~ s{^(lib|dist|(win32/|vms/|symbian/)?ext)/}{}

There hasn't been a win32/ext/ for some time, so should win32/ be
removed from the above, or is it still required for hysterical raisins?

[Jesse]

Post by Steve Hay
There hasn't been a win32/ext/ for some time, so should win32/ be
removed from the above, or is it still required for hysterical raisins?

Thanks. Applied.


--