+BEGIN { do "./t/lib/ANFANG.pm" or die ( $@ || $! ) }
+
use strict;
-use warnings;
+use warnings;
use Test::More tests => 2;
-use lib qw(t/lib);
+
use DBICTest;
use DBICTest::Schema;
use DBICTest::Schema::Artist;
my $a = $schema->resultset('FooA')->search;
is($a->count, 3, 'have 3 artists');
is($schema->class('FooA'), 'DBICTest::FooA', 'Correct artist class');
+
+# clean up
+DBICTest::Schema->_unregister_source('FooA');