--- David Landgren wrote:
> Seriously though, I have a module whose test suite includes Test::Pod
> and Test::Pod::Coverage, except that I use the following construct:
>
> SKIP: {
> skip( 'Test::Pod not installed on this system', 1 )
> unless do {
> eval qq{ use Test::Pod };
> $@ ? 0 : 1;
> };
>
> pod_file_ok( 'foobar.pm' );
> }
>
> The cpants analysis fails to recognise this as valid. What is it looking
> for and/or could it be taught to look for this? I thought that it was
> only looking for a string eval of "use Test::Pod".
I based mine on the Test::Pod::Coverage docs:
use Test::More;
eval "use Test::Pod::Coverage 1.00";
plan skip_all => "Test::Pod::Coverage 1.00 required for testing POD coverage"
if $@;
all_pod_coverage_ok();
and scored the coverage kwalitee point... Now, if I can just get cog to
pre-req my module (he teased me by saying he would ;-).
BTW, Module::Starter auto-generates a similar pod-coverage.t.
/-\
Send instant messages to your online friends http://au.messenger.yahoo.com
