|
Packit |
5b1f1f |
#!perl -T
|
|
Packit |
5b1f1f |
use 5.006;
|
|
Packit |
5b1f1f |
use strict;
|
|
Packit |
5b1f1f |
use warnings FATAL => 'all';
|
|
Packit |
5b1f1f |
use Test::More;
|
|
Packit |
5b1f1f |
|
|
Packit |
5b1f1f |
# Ensure a recent version of Test::Pod::Coverage
|
|
Packit |
5b1f1f |
my $min_tpc = 1.08;
|
|
Packit |
5b1f1f |
eval "use Test::Pod::Coverage $min_tpc";
|
|
Packit |
5b1f1f |
plan skip_all => "Test::Pod::Coverage $min_tpc required for testing POD coverage"
|
|
Packit |
5b1f1f |
if $@;
|
|
Packit |
5b1f1f |
|
|
Packit |
5b1f1f |
# Test::Pod::Coverage doesn't require a minimum Pod::Coverage version,
|
|
Packit |
5b1f1f |
# but older versions don't recognize some common documentation styles
|
|
Packit |
5b1f1f |
my $min_pc = 0.18;
|
|
Packit |
5b1f1f |
eval "use Pod::Coverage $min_pc";
|
|
Packit |
5b1f1f |
plan skip_all => "Pod::Coverage $min_pc required for testing POD coverage"
|
|
Packit |
5b1f1f |
if $@;
|
|
Packit |
5b1f1f |
|
|
Packit |
5b1f1f |
plan skip_all => "Author tests not required for installation"
|
|
Packit |
5b1f1f |
unless $ENV{AUTHOR_TESTING} or $ENV{RELEASE_TESTING};
|
|
Packit |
5b1f1f |
|
|
Packit |
5b1f1f |
plan tests => 1;
|
|
Packit |
5b1f1f |
pod_coverage_ok( "Net::CardDAVTalk", "main module is covered is covered" );
|