Skip to content

Commit

Permalink
Fix same bug that was cut/pasted from auto::pmc
Browse files Browse the repository at this point in the history
Add note about merging this dependency check into checkdepend.t
  • Loading branch information
coke committed Dec 29, 2010
1 parent c8161fc commit f668f73
Showing 1 changed file with 7 additions and 1 deletion.
8 changes: 7 additions & 1 deletion t/codingstd/pccmethod_deps.t
Expand Up @@ -9,6 +9,12 @@ use File::Spec;

use Test::More;

=head1 BUGS
This isn't part of t/src/checkdepend.t
=cut

my $pmc_dir = File::Spec->catfile(qw( src pmc *.pmc ));
my @pmcs = grep { contains_pccmethod($_) } glob($pmc_dir);
my $find_pmc = join( '|', map { s/\.pmc/\.dump/; quotemeta( $_ ) } @pmcs );
Expand All @@ -32,7 +38,7 @@ sub contains_pccmethod {

local $_;
while (<$fh>) {
next unless /METHOD/;
next unless /\bMETHOD\b/;
return 1;
}

Expand Down

0 comments on commit f668f73

Please sign in to comment.