remove debug code

This commit is contained in:
Graham Knop 2010-03-19 15:47:25 -05:00
parent 524a2608a8
commit 9edfda6491

View file

@ -113,7 +113,6 @@ sub find {
my @excludePatterns = map { s/(?<!\.)\*/.*/g; $_; } grep { /\*/ } @{ $options->{exclude} };
if (@excludePatterns) {
my $pattern = join q{|}, @excludePatterns;
warn $pattern;
my $exclusions = qr/$pattern/;
@modules = grep { ! m/$exclusions/ } @modules;
}