t/70_critic.t

   1 use strict;
   2 use warnings;
   3 use File::Spec;
   4 use Test::More;
   5
   6 eval { require Test::Perl::Critic; };
   7
   8 if ( $@ ) {
   9     my $msg = 'Test::Perl::Critic required to criticise code';
  10     plan( skip_all => $msg );
  11 }
  12
  13 my $rcfile = File::Spec->catfile( 't', 'perlcriticrc' );
  14 Test::Perl::Critic->import( -profile => $rcfile );
  15 all_critic_ok();
  16
  17
  18
  19 # Local Variables:
  20 # mode: cperl
  21 # cperl-indent-level: 4
  22 # End: