File: 04critic.t

package info (click to toggle)
libhttp-body-perl 1.23-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 532 kB
  • sloc: perl: 980; makefile: 2
file content (22 lines) | stat: -rw-r--r-- 489 bytes parent folder | download | duplicates (16)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
use strict;
use warnings;

use File::Spec;
use FindBin ();
use Test::More;

if ( !-e "$FindBin::Bin/../MANIFEST.SKIP" ) {
    plan skip_all => 'Critic test only for developers.';
}
else {
    eval { require Test::Perl::Critic };
    if ( $@ ) {
        plan tests => 1;
        fail( 'You must install Test::Perl::Critic to run 04critic.t' );
        exit;
    }
}

my $rcfile = File::Spec->catfile( 't', '04critic.rc' );
Test::Perl::Critic->import( -profile => $rcfile );
all_critic_ok();