X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FDBICTest%2FSchema.pm;h=d217e47cdb3d1d0d42fed7933c73dfd72a00f621;hb=4f6386b03a5e179c64240c8ab7b3bbec8a2004e1;hp=d69abc00a3cb868743d75cea3d08a52d9a8fa12f;hpb=e6a8b3fc4dc400af1a7ed827eaf9752ec99ad289;p=dbsrgits%2FDBIx-Class.git diff --git a/t/lib/DBICTest/Schema.pm b/t/lib/DBICTest/Schema.pm index d69abc0..d217e47 100644 --- a/t/lib/DBICTest/Schema.pm +++ b/t/lib/DBICTest/Schema.pm @@ -7,8 +7,11 @@ no warnings qw/qw/; __PACKAGE__->load_classes(qw/ Artist + SequenceTest Employee CD + FileColumn + Genre Link Bookmark #dummy @@ -17,6 +20,10 @@ __PACKAGE__->load_classes(qw/ /, { 'DBICTest::Schema' => [qw/ LinerNotes + Artwork + Image + Lyrics + LyricVersion OneKey #dummy TwoKeys @@ -24,14 +31,24 @@ __PACKAGE__->load_classes(qw/ /]}, ( 'FourKeys', + 'FourKeys_to_TwoKeys', '#dummy', 'SelfRef', 'ArtistUndirectedMap', 'ArtistSourceName', + 'ArtistSubclass', 'Producer', 'CD_to_Producer', ), - qw/SelfRefAlias TreeLike TwoKeyTreeLike/ + qw/SelfRefAlias TreeLike TwoKeyTreeLike Event EventTZ NoPrimaryKey/, + qw/Collection CollectionObject TypedObject Owners BooksInLibrary/, + qw/ForceForeign/, ); +sub sqlt_deploy_hook { + my ($self, $sqlt_schema) = @_; + + $sqlt_schema->drop_table('dummy'); +} + 1;