X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fprefetch%2Fstandard.t;h=7980da3ac5ae03c62b1e00dd025952a92b3543ba;hb=8ff609183688d3edffe7190a664d0e525b2c188d;hp=b155601766c3988900bb3807b32d02dafc58a45f;hpb=c0db3bf569e3673a237b058bbf703f2aabc0b36b;p=dbsrgits%2FDBIx-Class.git diff --git a/t/prefetch/standard.t b/t/prefetch/standard.t index b155601..7980da3 100644 --- a/t/prefetch/standard.t +++ b/t/prefetch/standard.t @@ -5,13 +5,12 @@ use Test::More; use Test::Exception; use lib qw(t/lib); use DBICTest; -use Data::Dumper; use IO::File; my $schema = DBICTest->init_schema(); my $orig_debug = $schema->storage->debug; -plan tests => 45; +plan tests => 44; my $queries = 0; $schema->storage->debugcb(sub { $queries++; }); @@ -20,8 +19,6 @@ $schema->storage->debug(1); my $search = { 'artist.name' => 'Caterwauler McCrae' }; my $attr = { prefetch => [ qw/artist liner_notes/ ], order_by => 'me.cdid' }; -my $search_str = Dumper($search); -my $attr_str = Dumper($attr); my $rs = $schema->resultset("CD")->search($search, $attr); my @cd = $rs->all;