X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F63register_class.t;h=e9053a358d3f9d849c2851cd2bbae09b09f98af7;hb=a9e8284f478f029f6f50c9423c3fa20aa3256d4a;hp=2fdc07cf163b288868527441bf3aff7abdf7abf9;hpb=b9537280fd9a38dc4856a286b1920dfc16978b11;p=dbsrgits%2FDBIx-Class.git diff --git a/t/63register_class.t b/t/63register_class.t index 2fdc07c..e9053a3 100644 --- a/t/63register_class.t +++ b/t/63register_class.t @@ -15,3 +15,6 @@ my $schema = DBICTest->init_schema(); 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');