super basic test for dm::sqlt
[dbsrgits/DBIx-Class-DeploymentHandler.git] / t / lib / DBICTest / Schema.pm
CommitLineData
b974984a 1package # hide from PAUSE
2 DBICTest::Schema;
3
4use base qw/DBIx::Class::Schema/;
5
6no warnings qw/qw/;
7
8__PACKAGE__->load_classes(qw/
9 Artist
10 SequenceTest
11 BindType
12 Employee
13 CD
14 FileColumn
15 Genre
16 Link
17 Bookmark
18 #dummy
19 Track
20 Tag
21 Year2000CDs
22 Year1999CDs
23 CustomSql
24 Money
25 /,
26 { 'DBICTest::Schema' => [qw/
27 LinerNotes
28 Artwork
29 Artwork_to_Artist
30 Image
31 Lyrics
32 LyricVersion
33 OneKey
34 #dummy
35 TwoKeys
36 Serialized
37 /]},
38 (
39 'FourKeys',
40 'FourKeys_to_TwoKeys',
41 '#dummy',
42 'SelfRef',
43 'ArtistUndirectedMap',
44 'ArtistSourceName',
45 'ArtistSubclass',
46 'Producer',
47 'CD_to_Producer',
48 'Dummy', # this is a real result class we remove in the hook below
49 ),
50 qw/SelfRefAlias TreeLike TwoKeyTreeLike Event EventTZ NoPrimaryKey/,
51 qw/Collection CollectionObject TypedObject Owners BooksInLibrary/,
52 qw/ForceForeign Encoded/,
53);
54
55sub sqlt_deploy_hook {
56 my ($self, $sqlt_schema) = @_;
57
58 $sqlt_schema->drop_table('dummy');
59}
60
611;