X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FDBICTest.pm;h=8252eccaa7cc8a56c30b3f33e0620185961fe159;hb=8871d4ad1ce3afa80338d355a21ba28d9b4a46ca;hp=516c299b734838f4441cd15854ef7046140888ee;hpb=89cf6a706832b79c02f980077bd30525b3716ee0;p=dbsrgits%2FDBIx-Class.git diff --git a/t/lib/DBICTest.pm b/t/lib/DBICTest.pm index 516c299..8252ecc 100755 --- a/t/lib/DBICTest.pm +++ b/t/lib/DBICTest.pm @@ -118,10 +118,7 @@ sub deploy_schema { my $args = shift || {}; if ($ENV{"DBICTEST_SQLT_DEPLOY"}) { - -#$schema->create_ddl_dir([qw/MySQL/], $schema->VERSION, '.', undef, $args); -$schema->deploy($args); - + $schema->deploy($args); } else { open IN, "t/lib/sqlite.sql"; my $sql; @@ -230,17 +227,17 @@ sub populate_schema { [ 1, 2 ], [ 1, 3 ], ]); - - # $schema->populate('TreeLike', [ - # [ qw/id parent name/ ], - # [ 0, 0, 'root' ], - # [ 1, 0, 'foo' ], - # [ 2, 1, 'bar' ], - # [ 5, 1, 'blop' ], - # [ 3, 2, 'baz' ], - # [ 4, 3, 'quux' ], - # [ 6, 2, 'fong' ], - # ]); + + $schema->populate('TreeLike', [ + [ qw/id parent_fk name/ ], + [ 1, undef, 'root' ], + [ 2, 1, 'foo' ], + [ 3, 2, 'bar' ], + [ 6, 2, 'blop' ], + [ 4, 3, 'baz' ], + [ 5, 4, 'quux' ], + [ 7, 3, 'fong' ], + ]); $schema->populate('Track', [ [ qw/trackid cd position title/ ],