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

use strict;
use warnings;

BEGIN {
  use lib 't/lib';
  use Test::More;

  plan skip_all => 'set TEST_AUTHOR to enable this test' unless $ENV{TEST_AUTHOR};

  eval 'use Test::Pod::Coverage 1.04';
  plan skip_all => 'Test::Pod::Coverage 1.04' if $@;

  eval 'use Pod::Coverage 0.14';
  plan skip_all => 'Pod::Coverage 0.14 not installed' if $@;
};

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

all_pod_coverage_ok($trustme);
Commit	Line	Data
e1eaa4ae	1	use strict;
	2	use warnings;
	3
	4	BEGIN {
ba8c183b	5	use lib 't/lib';
ba8c183b	6	use Test::More;
e1eaa4ae	7
ba8c183b	8	plan skip_all => 'set TEST_AUTHOR to enable this test' unless $ENV{TEST_AUTHOR};
e1eaa4ae	9
ba8c183b	10	eval 'use Test::Pod::Coverage 1.04';
ba8c183b	11	plan skip_all => 'Test::Pod::Coverage 1.04' if $@;
e1eaa4ae	12
ba8c183b	13	eval 'use Pod::Coverage 0.14';
ba8c183b	14	plan skip_all => 'Pod::Coverage 0.14 not installed' if $@;
e1eaa4ae	15	};
	16
	17	my $trustme = {
ba8c183b	18	trustme => [qr/^(g\|s)et_component_class$/]
e1eaa4ae	19	};
	20
	21	all_pod_coverage_ok($trustme);