remove ->deploy from castaway's test
[dbsrgits/DBIx-Class.git] / t / prefetch / undef_prefetch_bug.t
index 8f9ee07..2304309 100644 (file)
@@ -6,24 +6,39 @@ use lib qw(t/lib);
 use DBICTest;
 use PrefetchBug;
 
-BEGIN {
-    require DBIx::Class;
-    plan skip_all => 'Test needs ' .
-        DBIx::Class::Optional::Dependencies->req_missing_for('deploy')
-      unless DBIx::Class::Optional::Dependencies->req_ok_for('deploy');
-}
-
-  my $schema
-    = PrefetchBug->connect( DBICTest->_database (quote_char => '"') );
-  ok( $schema, 'Connected to PrefetchBug schema OK' );
-
-#################### DEPLOY
-
-  $schema->deploy( { add_drop_table => 1 } );
+my $schema = PrefetchBug->connect( DBICTest->_database (quote_char => '"') );
+ok( $schema, 'Connected to PrefetchBug schema OK' );
+
+$schema->storage->dbh->do(<<"EOF");
+CREATE TABLE prefetchbug_left (
+  id INTEGER PRIMARY KEY
+)
+EOF
+
+$schema->storage->dbh->do(<<"EOF");
+CREATE TABLE prefetchbug_right (
+  id INTEGER PRIMARY KEY,
+  name TEXT,
+  category TEXT,
+  description TEXT,
+  propagates INT,
+  locked INT
+)
+EOF
+
+$schema->storage->dbh->do(<<"EOF");
+CREATE TABLE prefetchbug_left_right (
+  left_id INTEGER REFERENCES prefetchbug_left(id),
+  right_id INTEGER REFERENCES prefetchbug_right(id),
+  value TEXT,
+  PRIMARY KEY (left_id, right_id)
+)
+EOF
 
 # Test simple has_many prefetch:
 
 my $leftc = $schema->resultset('Left')->create({});
+
 my $rightc = $schema->resultset('Right')->create({ id => 60, name => 'Johnny', category => 'something', description=> 'blah', propagates => 0, locked => 1 });
 $rightc->create_related('prefetch_leftright', { left => $leftc, value => 'lr' });