throw_exception if view_definition is missing instead of silent skipping + test changes
[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
818ec409 24 Money
5ce32fc1 25 /,
26 { 'DBICTest::Schema' => [qw/
27 LinerNotes
4f6386b0 28 Artwork
d5633096 29 Artwork_to_Artist
4f6386b0 30 Image
31 Lyrics
32 LyricVersion
5ce32fc1 33 OneKey
34 #dummy
35 TwoKeys
9fcda149 36 Serialized
5ce32fc1 37 /]},
38 (
39 'FourKeys',
3bd6e3e0 40 'FourKeys_to_TwoKeys',
5ce32fc1 41 '#dummy',
42 'SelfRef',
5efe4c79 43 'ArtistUndirectedMap',
bab77431 44 'ArtistSourceName',
b1fb2c94 45 'ArtistSubclass',
7411204b 46 'Producer',
47 'CD_to_Producer',
181c0934 48 'Dummy', # this is a real result class we remove in the hook below
5ce32fc1 49 ),
dda9af55 50 qw/SelfRefAlias TreeLike TwoKeyTreeLike Event EventTZ NoPrimaryKey/,
a7e65bb5 51 qw/Collection CollectionObject TypedObject Owners BooksInLibrary/,
6e6b37a7 52 qw/ForceForeign Encoded/,
5ce32fc1 53);
a02675cd 54
d6c79cb3 55sub sqlt_deploy_hook {
56 my ($self, $sqlt_schema) = @_;
57
458e0292 58 $sqlt_schema->drop_table('dummy');
d6c79cb3 59}
60
a02675cd 611;