Lazy folks do not run the whole test suite before merging >:(
[dbsrgits/DBIx-Class.git] / t / lib / DBICTest / Schema.pm
CommitLineData
bab77431 1package # hide from PAUSE
c6d74d3e 2 DBICTest::Schema;
a02675cd 3
4use base qw/DBIx::Class::Schema/;
5
5ce32fc1 6no warnings qw/qw/;
7
a02675cd 8__PACKAGE__->load_classes(qw/
5ce32fc1 9 Artist
b829910c 10 SequenceTest
6ec7d1bb 11 BindType
4e298a80 12 Employee
5ce32fc1 13 CD
4740bdb7 14 FileColumn
370f2ba2 15 Genre
9c2c91ea 16 Link
17 Bookmark
5ce32fc1 18 #dummy
19 Track
20 Tag
a648ec78 21 Year2000CDs
1ee9aa72 22 Year1999CDs
b8b55c8e 23 CustomSql
5ce32fc1 24 /,
25 { 'DBICTest::Schema' => [qw/
26 LinerNotes
4f6386b0 27 Artwork
d5633096 28 Artwork_to_Artist
4f6386b0 29 Image
30 Lyrics
31 LyricVersion
5ce32fc1 32 OneKey
33 #dummy
34 TwoKeys
9fcda149 35 Serialized
5ce32fc1 36 /]},
37 (
38 'FourKeys',
3bd6e3e0 39 'FourKeys_to_TwoKeys',
5ce32fc1 40 '#dummy',
41 'SelfRef',
5efe4c79 42 'ArtistUndirectedMap',
bab77431 43 'ArtistSourceName',
b1fb2c94 44 'ArtistSubclass',
7411204b 45 'Producer',
46 'CD_to_Producer',
181c0934 47 'Dummy', # this is a real result class we remove in the hook below
5ce32fc1 48 ),
dda9af55 49 qw/SelfRefAlias TreeLike TwoKeyTreeLike Event EventTZ NoPrimaryKey/,
a7e65bb5 50 qw/Collection CollectionObject TypedObject Owners BooksInLibrary/,
6e6b37a7 51 qw/ForceForeign Encoded/,
5ce32fc1 52);
a02675cd 53
d6c79cb3 54sub sqlt_deploy_hook {
55 my ($self, $sqlt_schema) = @_;
56
458e0292 57 $sqlt_schema->drop_table('dummy');
d6c79cb3 58}
59
a02675cd 601;