X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FDBICTest%2FSchema.pm;h=a3e4484218ed368cc8f50e04ed9631264e59e8d0;hb=818ec409baa3cd8a520bb6164a83e9a90fb84674;hp=90308ab39ffe3a5033e1409c1de6303b8d3d5f94;hpb=1e3ff0144580732bc73b4f8041ace7da5eae488c;p=dbsrgits%2FDBIx-Class.git diff --git a/t/lib/DBICTest/Schema.pm b/t/lib/DBICTest/Schema.pm index 90308ab..a3e4484 100644 --- a/t/lib/DBICTest/Schema.pm +++ b/t/lib/DBICTest/Schema.pm @@ -1,4 +1,4 @@ -package # hide from PAUSE +package # hide from PAUSE DBICTest::Schema; use base qw/DBIx::Class::Schema/; @@ -7,15 +7,29 @@ no warnings qw/qw/; __PACKAGE__->load_classes(qw/ Artist - Employee::Positional - Employee::AdjacencyList + SequenceTest + BindType + Employee CD + FileColumn + Genre + Link + Bookmark #dummy Track Tag + Year2000CDs + Year1999CDs + CustomSql + Money /, { 'DBICTest::Schema' => [qw/ LinerNotes + Artwork + Artwork_to_Artist + Image + Lyrics + LyricVersion OneKey #dummy TwoKeys @@ -23,13 +37,25 @@ __PACKAGE__->load_classes(qw/ /]}, ( 'FourKeys', + 'FourKeys_to_TwoKeys', '#dummy', 'SelfRef', 'ArtistUndirectedMap', + 'ArtistSourceName', + 'ArtistSubclass', 'Producer', 'CD_to_Producer', + 'Dummy', # this is a real result class we remove in the hook below ), - qw/SelfRefAlias TreeLike/ + qw/SelfRefAlias TreeLike TwoKeyTreeLike Event EventTZ NoPrimaryKey/, + qw/Collection CollectionObject TypedObject Owners BooksInLibrary/, + qw/ForceForeign Encoded/, ); +sub sqlt_deploy_hook { + my ($self, $sqlt_schema) = @_; + + $sqlt_schema->drop_table('dummy'); +} + 1;