3 use DBIx::Class::Fixtures;
4 use Test::More tests => 7;
13 # set up and populate normal schema
14 ok(my $schema = DBICTest->init_schema(), 'got schema');
15 my $config_dir = io->catfile(qw't var configs')->name;
16 my $dbix_class_different = io->catfile(qw[ t var DBIxClassDifferent.db ])->name;
17 my @different_connection_details = (
18 "dbi:SQLite:$dbix_class_different",
23 my $schema2 = DBICTest::Schema2->compose_namespace('DBICTest2')
24 ->connect(@different_connection_details);
28 unlink($dbix_class_different) if (-e $dbix_class_different );
30 DBICTest->deploy_schema($schema2, 't lib sqlite_different.sql');
33 ok(my $fixtures = DBIx::Class::Fixtures->new({
34 config_dir => $config_dir,
37 'object created with correct config dir');
40 config => "simple.json",
42 directory => io->catfile(qw't var fixtures')->name
44 "simple dump executed okay");
46 ok($fixtures->populate({
47 ddl => io->catfile(qw[t lib sqlite_different.sql])->name,
48 connection_details => [@different_connection_details],
49 directory => io->catfile(qw't var fixtures')->name
51 'mysql populate okay');
53 ok($fixtures->populate({
54 ddl => io->catfile(qw[ t lib sqlite.sql ])->name,
55 connection_details => ['dbi:SQLite:'.io->catfile(qw[ t var DBIxClass.db ])->name, '', ''],
56 directory => io->catfile(qw't var fixtures')->name
58 'sqlite populate okay');
60 $schema = DBICTest->init_schema(no_deploy => 1);
61 is($schema->resultset('Artist')->count, 1, 'artist imported to sqlite okay');