4 use DBIx::Class::Fixtures;
7 use File::Path 'rmtree';
9 use lib qw(t/lib/DBICTest);
11 use Test::TempDir::Tiny;
14 my $tempdir = tempdir;
16 (my $schema = Schema3->connect(
17 'DBI:SQLite::memory:','',''))->init_schema;
23 ok $row->get_column('weight_to_height_ratio'),
26 my $fixtures = DBIx::Class::Fixtures
28 config_dir => io->catfile(qw't var configs')->name,
33 config => 'virtual-columns.json',
35 directory => io->catfile($tempdir, 'people')->name }),
36 'fetch dump executed okay');
38 ok $schema->resultset('Person')->delete;
44 directory => io->catfile($tempdir, 'people')->name
46 }, undef, 'populated';
48 $row = $schema->resultset('Person')->first;
50 BAIL_OUT("can't continue without data") unless $row;
52 ok $row->get_column('weight_to_height_ratio'),
53 'still has virtual column';
58 rmtree io->catfile(qw't var files')->name;
59 rmtree io->catfile($tempdir, 'people')->name;