X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Frun%2F10auto.tl;h=b108369757fc5e72c8926f29ca06e1ae6cf9cfde;hb=70350518bbb31e5ac22fb3cb73d3e17409fcd332;hp=7c795f40b460e4022b4cdbe0704ebae6f0f4f618;hpb=4b8dcc58874223164d4a379a5db4a9cb737d7c7a;p=dbsrgits%2FDBIx-Class.git diff --git a/t/run/10auto.tl b/t/run/10auto.tl index 7c795f4..b108369 100644 --- a/t/run/10auto.tl +++ b/t/run/10auto.tl @@ -1,5 +1,11 @@ -sub run_tests { -my $schema = shift; +use strict; +use warnings; + +use Test::More; +use lib qw(t/lib); +use DBICTest; + +my $schema = DBICTest::init_schema(); plan tests => 2; @@ -14,6 +20,3 @@ ok($artist->update, 'update on object created without PK ok'); my $copied = $artist->copy({ name => 'Don\'t tell the RIAA', artistid => undef }); is($copied->name, 'Don\'t tell the RIAA', "Copied with PKs ok."); -} - -1;