X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F26dumper.t;h=ade50318490d35f5cf9e4b89facb1240530568fb;hb=fcf32d045;hp=0cda954cc9232a23774cb480bfc28b18ba6d1e9a;hpb=c93ddd59cd34aec049de47a63012a7d519de2ad9;p=dbsrgits%2FDBIx-Class.git

diff --git a/t/26dumper.t b/t/26dumper.t
index 0cda954..ade5031 100644
--- a/t/26dumper.t
+++ b/t/26dumper.t
@@ -1,23 +1,14 @@
 use strict;
+use warnings;
 use Test::More;
-use IO::File;
 
 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;