projects
/
dbsrgits/DBIx-Class.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
0e7f9e12938dc3166efbdc0214e5bfbf9cbb1bfa
[dbsrgits/DBIx-Class.git]
/
t
/
prefetch
/
bugs.t
1
use warnings;
2
use strict;
3
4
use Test::More;
5
6
use lib qw(t/lib);
7
use DBICTest;
8
9
my $schema = DBICTest->init_schema(
10
no_populate => 1,
11
);
12
13
$schema->resultset('CD')->create({
14
cdid => 0,
15
artist => {
16
artistid => 0,
17
name => 0,
18
rank => 0,
19
charfield => 0,
20
},
21
title => 0,
22
year => 0,
23
genreid => 0,
24
single_track => 0,
25
});
26
27
ok( $schema->resultset('CD')->search( {}, { prefetch => 'artist' })->first->artist, 'artist loads even if all columns are 0');
28
29
done_testing;