Login
Don't run RequireTidyCode and PodSpelling when
authorJeffrey Ryan Thalhammer <jeff@imaginative-software.com>
Sat, 28 Feb 2009 21:22:29 +0000 (21:22 +0000)
committerJeffrey Ryan Thalhammer <jeff@imaginative-software.com>
Sat, 28 Feb 2009 21:22:29 +0000 (21:22 +0000)
benchmarking, since we know they are slow and
there's not much we can do about it, they tend
to skew the results.

tools/pc-benchmark

index 9a66ff8..b82192d 100755 (executable)
@@ -13,7 +13,8 @@ our $VERSION = '0.01';
 #---------------------------------------------------------------
 
 
-my %pc_opts = (-profile => '', -theme => 'core', -severity => 1);
+my @exclude = qw(TidyCode PodSpelling);  # We can't really optimize these
+my %pc_opts = (-profile => '', -theme => 'core', -severity => 1, -exclude => \@exclude);
 my $pc = Perl::Critic->new( %pc_opts );
 
 my $test_file = shift @ARGV || die "Must specify a test file.\n";