3 use DBIx::Class::Fixtures;
4 use Test::More no_plan;
12 # set up and populate schema
13 ok( my $schema = DBICTest->init_schema(), 'got schema' );
14 my $config_dir = io->catfile(qw't var configs')->name;
18 my $fixtures = DBIx::Class::Fixtures->new(
20 config_dir => $config_dir,
24 'object created with correct config dir'
27 DBICTest->clear_schema($schema);
28 DBICTest->populate_schema($schema);
34 directory => io->catfile(qw't var fixtures')->name,
35 config => "unicode.json",
38 "unicode dump executed okay"
43 connection_details => [ 'dbi:SQLite:' . io->catfile(qw[ t var DBIxClass.db ])->name, '', '' ],
44 directory => io->catfile(qw't var fixtures')->name,
47 use_find_or_create => 1,
51 my $cd = $schema->resultset('CD')->find( { cdid => 5 });
53 is($cd->title, "Unicode Chars ™ © • † ∑ α β « » → …", "Unicode chars found");