X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F03podcoverage.t;h=e3059a16addb3bff31072aa36c2d958c53dd70bc;hb=aac494465422ef611b92ccafffcdd426d52d8b25;hp=35add8608bc7996af85db27b534df17833e56487;hpb=aa11d765d7345d63fbc497b4b5c16776eedbaa6e;p=dbsrgits%2FDBIx-Class-Historic.git diff --git a/t/03podcoverage.t b/t/03podcoverage.t index 35add86..e3059a1 100644 --- a/t/03podcoverage.t +++ b/t/03podcoverage.t @@ -1,7 +1,10 @@ use Test::More; +eval "use Pod::Coverage 0.19"; +plan skip_all => 'Pod::Coverage 0.19 required' if $@; eval "use Test::Pod::Coverage 1.04"; plan skip_all => 'Test::Pod::Coverage 1.04 required' if $@; + plan skip_all => 'set TEST_POD to enable this test' unless ($ENV{TEST_POD} || -e 'MANIFEST.SKIP'); @@ -31,6 +34,11 @@ my $exceptions = { qw(cursor) ] }, + 'DBIx::Class::Schema' => { + ignore => [ + qw(setup_connection_class) + ] + }, 'DBIx::Class::CDBICompat::AccessorMapping' => { skip => 1 }, 'DBIx::Class::CDBICompat::AbstractSearch' => { ignore => [qw(search_where)] @@ -55,12 +63,13 @@ my $exceptions = { 'DBIx::Class::CDBICompat::LazyLoading' => { skip => 1 }, 'DBIx::Class::CDBICompat::LiveObjectIndex' => { skip => 1 }, 'DBIx::Class::CDBICompat::MightHave' => { skip => 1 }, - 'DBIx::Class::CDBICompat::ObjIndexStubs' => { skip => 1 }, + 'DBIx::Class::CDBICompat::NoObjectIndex' => { skip => 1 }, 'DBIx::Class::CDBICompat::Pager' => { skip => 1 }, 'DBIx::Class::CDBICompat::ReadOnly' => { skip => 1 }, 'DBIx::Class::CDBICompat::Relationship' => { skip => 1 }, 'DBIx::Class::CDBICompat::Relationships' => { skip => 1 }, 'DBIx::Class::CDBICompat::Retrieve' => { skip => 1 }, + 'DBIx::Class::CDBICompat::SQLTransformer' => { skip => 1 }, 'DBIx::Class::CDBICompat::Stringify' => { skip => 1 }, 'DBIx::Class::CDBICompat::TempColumns' => { skip => 1 }, 'DBIx::Class::CDBICompat::Triggers' => { skip => 1 }, @@ -75,6 +84,7 @@ my $exceptions = { 'DBIx::Class::Relationship::ManyToMany' => { skip => 1 }, 'DBIx::Class::Relationship::ProxyMethods' => { skip => 1 }, 'DBIx::Class::ResultSetProxy' => { skip => 1 }, + 'DBIx::Class::ResultSetManager' => { skip => 1 }, 'DBIx::Class::ResultSourceProxy' => { skip => 1 }, 'DBIx::Class::Storage::DBI' => { skip => 1 }, 'DBIx::Class::Storage::DBI::DB2' => { skip => 1 }, @@ -97,9 +107,8 @@ my $exceptions = { 'DBIx::Class::Schema::Versioned' => { ignore => [ qw(connection) ] }, -# must kill authors. - - 'DBIx::Class::Storage::DBI::Replication' => { skip => 1 }, +# don't bother since it's heavily deprecated + 'DBIx::Class::ResultSetManager' => { skip => 1 }, }; foreach my $module (@modules) {