diff options
Diffstat (limited to 'Porting/makemeta')
| -rw-r--r-- | Porting/makemeta | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Porting/makemeta b/Porting/makemeta index 167209ab6f..7e9eff776e 100644 --- a/Porting/makemeta +++ b/Porting/makemeta @@ -17,7 +17,7 @@ use Maintainers qw(%Modules get_module_files get_module_pat); my @CPAN = grep { $Modules{$_}{CPAN} } keys %Modules; my @files = map { get_module_files($_) } @CPAN; -my @dirs = grep { -d $_ } map { get_module_pat($_) } @CPAN; +my @dirs = ('cpan', grep { -d $_ && $_ !~ /^cpan/ } map { get_module_pat($_) } @CPAN); my %dirs; @dirs{@dirs} = (); |