X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F26dumper.t;h=e392df9b8fd5017978805461fa7dd8062ea337d5;hb=dc4600b2b9be4ae9a91c8ab49bdbb7ce2c23d0f7;hp=0cda954cc9232a23774cb480bfc28b18ba6d1e9a;hpb=c93ddd59cd34aec049de47a63012a7d519de2ad9;p=dbsrgits%2FDBIx-Class-Historic.git diff --git a/t/26dumper.t b/t/26dumper.t index 0cda954..e392df9 100644 --- a/t/26dumper.t +++ b/t/26dumper.t @@ -6,18 +6,9 @@ use Data::Dumper; $Data::Dumper::Sortkeys = 1; use lib qw(t/lib); - -BEGIN { - eval "use DBD::SQLite"; - plan $ENV{DATA_DUMPER_TEST} - ? ( tests => 2 ) - : ( skip_all => 'Set $ENV{DATA_DUMPER_TEST} to run this test' ); -} - - use_ok('DBICTest'); -my $schema = DBICTest::init_schema(); +my $schema = DBICTest->init_schema(); my $rs = $schema->resultset('CD')->search({ 'artist.name' => 'We Are Goth', 'liner_notes.notes' => 'Kill Yourself!', @@ -36,4 +27,4 @@ $rs = $schema->resultset('CD')->search({ cmp_ok( $rs->count(), '==', 1, "Single record in after death with dumper"); -1; +done_testing;