X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F40resultsetmanager.t;h=26707f0667b737bf9573db1fb9251b93de1524ce;hb=9c0df5f32b68e23c670c89ce6cdbff60b4bd0ed0;hp=0b7471a0603269f63e282c82ef746dc9c8121c3e;hpb=d323165330a1470afdf5a9da4ff2fc270de4570e;p=dbsrgits%2FDBIx-Class.git diff --git a/t/40resultsetmanager.t b/t/40resultsetmanager.t index 0b7471a..26707f0 100644 --- a/t/40resultsetmanager.t +++ b/t/40resultsetmanager.t @@ -15,12 +15,17 @@ BEGIN { } } -use DBICTest::Extra; # uses Class::Inspector +BEGIN { + local $SIG{__WARN__} = sub {}; + require DBIx::Class::ResultSetManager; +} + +use DBICTest::ResultSetManager; # uses Class::Inspector -my $schema = DBICTest::Extra->compose_connection('DB', 'foo'); +my $schema = DBICTest::ResultSetManager->compose_namespace('DB'); my $rs = $schema->resultset('Foo'); ok( !DB::Foo->can('bar'), 'Foo class does not have bar method' ); ok( $rs->can('bar'), 'Foo resultset class has bar method' ); -isa_ok( $rs, 'DBICTest::Extra::Foo::_resultset', 'Foo resultset class is correct' ); +isa_ok( $rs, 'DBICTest::ResultSetManager::Foo::_resultset', 'Foo resultset class is correct' ); is( $rs->bar, 'good', 'bar method works' );