1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
#!perl -wT
# $Id: /local/Class-Data-Accessor/t/pod_coverage.t 1369 2007-05-06T03:54:57.072053Z claco $
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);
|
