X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F24loader_subclass.t;h=78a553543789c1be15d39990e665a52d9cfff6b0;hb=9334ac2606ee91e9d3b6bd251e1aa3dfd60618a3;hp=143c5db25455fdc8634eb800f67890a107114687;hpb=29ddb54c1face495013d878a6386efa25c32d6ea;p=dbsrgits%2FDBIx-Class-Schema-Loader.git diff --git a/t/24loader_subclass.t b/t/24loader_subclass.t index 143c5db..78a5535 100644 --- a/t/24loader_subclass.t +++ b/t/24loader_subclass.t @@ -4,27 +4,31 @@ use Test::More; use lib qw(t/lib); use make_dbictest_db; -my %loader_class = ( 'TestLoaderSubclass' => 'TestLoaderSubclass', - '::DBI::SQLite' => 'DBIx::Class::Schema::Loader::DBI::SQLite' - ); +my %loader_class = ( + 'TestLoaderSubclass' => 'TestLoaderSubclass', + 'TestLoaderSubclass_NoRebless' => 'TestLoaderSubclass_NoRebless', + '::DBI::SQLite' => 'DBIx::Class::Schema::Loader::DBI::SQLite' +); my %invocations = ( loader_class => sub { package DBICTest::Schema::1; use base qw/ DBIx::Class::Schema::Loader /; + __PACKAGE__->naming('current'); __PACKAGE__->loader_class(shift); __PACKAGE__->connect($make_dbictest_db::dsn); }, connect_info => sub { package DBICTeset::Schema::2; use base qw/ DBIx::Class::Schema::Loader /; + __PACKAGE__->naming('current'); __PACKAGE__->connect($make_dbictest_db::dsn, { loader_class => shift }); }, make_schema_at => sub { use DBIx::Class::Schema::Loader qw/ make_schema_at /; make_schema_at( 'DBICTeset::Schema::3', - { }, + { naming => 'current' }, [ $make_dbictest_db::dsn, { loader_class => shift } ] ); }