Commit | Line | Data |
fd56ddb6 |
1 | #!perl |
2 | |
a5bbbab1 |
3 | use warnings FATAL => 'all'; |
4 | use strict; |
5 | use File::Spec; |
fd56ddb6 |
6 | use Test::More; |
a5bbbab1 |
7 | |
8 | if ( not $ENV{TEST_AUTHOR} ) { |
9 | my $msg |
10 | = 'Author test. Set $ENV{TEST_AUTHOR} to a true value to run.'; |
11 | plan( skip_all => $msg ); |
fd56ddb6 |
12 | } |
13 | |
a5bbbab1 |
14 | eval { require Test::Perl::Critic; }; |
2b21d04e |
15 | if ($@) { |
a5bbbab1 |
16 | my $msg = 'Test::Perl::Critic required to criticise code'; |
17 | plan( skip_all => $msg ); |
18 | } |
19 | |
20 | #my $rcfile = File::Spec->catfile( 't', 'perlcriticrc' ); |
21 | #Test::Perl::Critic->import( -profile => $rcfile ); |
22 | #all_critic_ok(); |
fd56ddb6 |
23 | Test::Perl::Critic::all_critic_ok(); |
a5bbbab1 |
24 | |