X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FDBICTest%2FSchema.pm;h=a35d54e879380bbd25c56a8d776f849ad57b3488;hb=0e80c4ca9995674bcc86bc59780b940ce20c48d2;hp=2355aeb8ba018b6c1add4ba28a6364fbd14cd99b;hpb=887ce227864c9a1c2450cfaf95458772ffea860a;p=dbsrgits%2FDBIx-Class.git

diff --git a/t/lib/DBICTest/Schema.pm b/t/lib/DBICTest/Schema.pm
index 2355aeb..a35d54e 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,26 +7,50 @@ no warnings qw/qw/;
 
 __PACKAGE__->load_classes(qw/
   Artist
+  SequenceTest
+  BindType
+  Employee
   CD
+  FileColumn
+  Genre
+  Link
+  Bookmark
   #dummy
   Track
   Tag
   /,
   { 'DBICTest::Schema' => [qw/
     LinerNotes
+    Artwork
+    Image
+    Lyrics
+    LyricVersion
     OneKey
     #dummy
     TwoKeys
+    Serialized
   /]},
   (
     'FourKeys',
+    'FourKeys_to_TwoKeys',
     '#dummy',
     'SelfRef',
     'ArtistUndirectedMap',
+    'ArtistSourceName',
+    'ArtistSubclass',
     'Producer',
     'CD_to_Producer',
+    'Dummy',    # this is a real result class we remove in the hook below
   ),
-  qw/SelfRefAlias TreeLike/
+  qw/SelfRefAlias TreeLike TwoKeyTreeLike Event EventTZ NoPrimaryKey/,
+  qw/Collection CollectionObject TypedObject Owners BooksInLibrary/,
+  qw/ForceForeign Encoded/,
 );
 
+sub sqlt_deploy_hook {
+  my ($self, $sqlt_schema) = @_;
+
+  $sqlt_schema->drop_table('dummy');
+}
+
 1;