Source

p5-thanks / xt / 02pod_coverage.t

Full commit
Toby Inkster b6f7295 
Toby Inkster 6d0a566 


Toby Inkster b6f7295 

Toby Inkster 6d0a566 
Toby Inkster b6f7295 









use XT::Util;
use Test::More;
use Test::Pod::Coverage;

plan skip_all => __CONFIG__->{skip_all}
	if __CONFIG__->{skip_all};

if ( __CONFIG__->{modules} )
{
	my @modules = @{ __CONFIG__->{modules} };
	pod_coverage_ok($_, "$_ is covered") for @modules;
	done_testing(scalar @modules);
}
else
{
	all_pod_coverage_ok();
}