X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FDBICTest%2FSchema.pm;h=08f396fedd957523759b9cdf9dddd82387ade771;hb=370f2ba2727791641c350a20e4fd09469503dbae;hp=6f37ba90709cb2f405ba0c4bd1f509335a33d523;hpb=d6ba2772d5ca3e3e9c656d42ed04ba01392b4125;p=dbsrgits%2FDBIx-Class.git diff --git a/t/lib/DBICTest/Schema.pm b/t/lib/DBICTest/Schema.pm index 6f37ba9..08f396f 100644 --- a/t/lib/DBICTest/Schema.pm +++ b/t/lib/DBICTest/Schema.pm @@ -1,4 +1,5 @@ -package DBICTest::Schema; +package # hide from PAUSE + DBICTest::Schema; use base qw/DBIx::Class::Schema/; @@ -6,7 +7,13 @@ no warnings qw/qw/; __PACKAGE__->load_classes(qw/ Artist + SequenceTest + Employee CD + FileColumn + Genre + Link + Bookmark #dummy Track Tag @@ -16,16 +23,28 @@ __PACKAGE__->load_classes(qw/ OneKey #dummy TwoKeys + Serialized /]}, ( 'FourKeys', + 'FourKeys_to_TwoKeys', '#dummy', 'SelfRef', 'ArtistUndirectedMap', + 'ArtistSourceName', + 'ArtistSubclass', 'Producer', 'CD_to_Producer', ), - qw/SelfRefAlias/ + 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;