use lib qw(t/lib);
use DBICTest;
+plan skip_all => 'Disabled on windows, pending resolution of DBD::SQLite SIGSEGVs'
+ if $^O eq 'MSWin32';
+
my $code = sub {
my ($artist, @cd_titles) = @_;
year => 2006,
}) foreach (@cd_titles);
- return $artist->cds;
+ return $artist->cds->all;
};
# Test checking of parameters