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