X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F102load_classes.t;h=ef99b3aec15eb8a2bcd6a4a7ccba9fb438693c7c;hb=7dc14bc09910cb750e5fe503dfa18a97eed490d1;hp=6612ffadac3ed37b7e5ce7de36bbfc5afa2907c2;hpb=f54428abf9cc7d7e5604745335694eaf558f6820;p=dbsrgits%2FDBIx-Class.git

diff --git a/t/102load_classes.t b/t/102load_classes.t
index 6612ffa..ef99b3a 100644
--- a/t/102load_classes.t
+++ b/t/102load_classes.t
@@ -1,10 +1,11 @@
+BEGIN { do "./t/lib/ANFANG.pm" or die ( $@ || $! ) }
+
 use strict;
 use warnings;
 use Test::More;
 
-unshift(@INC, './t/lib');
 
-plan tests => 4;
+use DBICTest;
 
 my $warnings;
 eval {
@@ -21,3 +22,4 @@ isa_ok($source_a, 'DBIx::Class::ResultSource::Table');
 my $rset_a   = DBICTest::Schema->resultset('Artist');
 isa_ok($rset_a, 'DBIx::Class::ResultSet');
 
+done_testing;