0.006 release
[poe-xs-queue-array.git] / t / 91_pod_cover.t
CommitLineData
6c12123e
TC
1#!perl -w
2use strict;
3use Test::More;
4eval "use Test::Pod::Coverage";
5plan skip_all => "Test::Pod::Coverage required for testing pod coverage" if $@;
6
7plan tests => 1;
8my %cover_opts =
9 (
10 coverage_class => 'Pod::Coverage::CountParents',
11 also_private => [ qr/^ITEM_(ID|PAYLOAD|PRIORITY)$/ ],
12 );
13pod_coverage_ok( "POE::XS::Queue::Array", \%cover_opts);