3 use Test::More tests => 2;
8 # set up and populate schema
9 ok(my $schema = DBICTest->init_schema(), 'got schema');
11 my $producer_rs = $schema->resultset('Producer')->display();
13 is_deeply([sort { $a->{producerid} <=> $b->{producerid} } @{$producer_rs}], [
15 'name' => 'Matt S Trout',
19 'name' => 'Bob The Builder',
23 'name' => 'Fred The Phenotype',
26 ], 'display returned as expected');