In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/fae1af826feacb5c14cf7998f1f9686fc043fa05?hp=8dcfe2e99a72fe7951b4d15325e1541232823204>
- Log ----------------------------------------------------------------- commit fae1af826feacb5c14cf7998f1f9686fc043fa05 Author: Nicholas Clark <[email protected]> Date: Thu Oct 14 15:30:47 2010 +0100 Remove the code for file exclusions from Maintainers.pm - nothing needs it now. M Porting/Maintainers.pm commit bd774df311de60ae39cf76756d15eebd55217e88 Author: Nicholas Clark <[email protected]> Date: Thu Oct 14 14:39:15 2010 +0100 Since c440907b, Maintainers.pl doesn't need exclusions for XSLoader's files. Previously, XSLoader and DynaLoader shared a directory (ext/DynaLoader). The ownership lists for core files was expressed as ext/DynaLoader, with specific exclusions for XSLoader's files. These are now superfluous. M Porting/Maintainers.pl ----------------------------------------------------------------------- Summary of changes: Porting/Maintainers.pl | 2 -- Porting/Maintainers.pm | 12 +----------- 2 files changed, 1 insertions(+), 13 deletions(-) diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl index 5d87de2..165f823 100755 --- a/Porting/Maintainers.pl +++ b/Porting/Maintainers.pl @@ -1652,8 +1652,6 @@ use File::Glob qw(:case); ext/Devel-Peek/ ext/Devel-SelfStubber/ ext/DynaLoader/ - !ext/DynaLoader/t/XSLoader.t - !ext/DynaLoader/XSLoader_pm.PL ext/Errno ext/Fcntl/ ext/File-Glob/ diff --git a/Porting/Maintainers.pm b/Porting/Maintainers.pm index 187e38b..51c847f 100644 --- a/Porting/Maintainers.pm +++ b/Porting/Maintainers.pm @@ -89,17 +89,7 @@ sub expand_glob { sub get_module_files { my $m = shift; - my %exclude; - my @files; - for (get_module_pat($m)) { - if (s/^!//) { - $exclude{$_}=1 for expand_glob($_); - } - else { - push @files, expand_glob($_); - } - } - return grep !$exclude{$_}, @files; + return map { expand_glob($_) } get_module_pat($m); } -- Perl5 Master Repository
