[p5sagit/Class-Accessor-Grouped.git] / xt / pod_coverage.t

use strict;
use warnings;
use Test::More;
BEGIN {
  eval 'use Test::Pod::Coverage 1.04; 1' or
    plan skip_all => 'Test::Pod::Coverage 1.04 not installed';

  eval 'use Pod::Coverage 0.14; 1'
    or plan skip_all => 'Pod::Coverage 0.14 not installed';
}

my $trustme = {
  trustme => [qr/^(g|s)et_component_class$/]
};

all_pod_coverage_ok($trustme);
Commit	Line	Data
cc645e61	1	use strict;
	2	use warnings;
	3	use Test::More;
	4	BEGIN {
	5	eval 'use Test::Pod::Coverage 1.04; 1' or
	6	plan skip_all => 'Test::Pod::Coverage 1.04 not installed';
	7
	8	eval 'use Pod::Coverage 0.14; 1'
	9	or plan skip_all => 'Pod::Coverage 0.14 not installed';
	10	}
	11
	12	my $trustme = {
	13	trustme => [qr/^(g\|s)et_component_class$/]
	14	};
	15
	16	all_pod_coverage_ok($trustme);