From: Rob Kinyon Date: Fri, 20 Feb 2009 03:18:05 +0000 (+0000) Subject: Fixed some tests so they're now passing (things like bad plans and pod-coverage) X-Git-Tag: v0.08240~96^2~1 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=0c62fa59d419dcec4df6da35f2b09381685e57b0;p=dbsrgits%2FDBIx-Class.git Fixed some tests so they're now passing (things like bad plans and pod-coverage) --- diff --git a/t/03podcoverage.t b/t/03podcoverage.t index e3059a1..18c5292 100644 --- a/t/03podcoverage.t +++ b/t/03podcoverage.t @@ -29,6 +29,11 @@ my $exceptions = { mk_classaccessor/ ] }, + 'DBIx::Class::Row' => { + ignore => [ + qw( MULTICREATE_DEBUG ) + ], + }, 'DBIx::Class::Storage' => { ignore => [ qw(cursor) diff --git a/t/66relationship.t b/t/66relationship.t index 88f5c16..0ae02e6 100644 --- a/t/66relationship.t +++ b/t/66relationship.t @@ -8,7 +8,7 @@ use DBICTest; my $schema = DBICTest->init_schema(); -plan tests => 75; +plan tests => 69; # has_a test my $cd = $schema->resultset("CD")->find(4); diff --git a/t/96multi_create.t b/t/96multi_create.t index 9c75cac..77cc347 100644 --- a/t/96multi_create.t +++ b/t/96multi_create.t @@ -6,7 +6,7 @@ use Test::Exception; use lib qw(t/lib); use DBICTest; -plan tests => 85; +plan tests => 79; my $schema = DBICTest->init_schema();