use warnings;
use Test::More;
+BEGIN {
+ plan skip_all => 'Disable test entirely until multicreate is rewritten in terms of subqueries';
+}
+
use Test::Exception;
use lib qw(t/lib);
use DBICTest;
$schema->storage->debugcb (sub { push @{$query_stats->{$_[0]}}, $_[1] });
$schema->storage->debug (1);
-TODO: {
- local $TODO = 'This is an optimization task, will wait... a while';
-
lives_ok (sub {
undef $query_stats;
$schema->resultset('Artist')->create ({
|| $ENV{DBIC_MULTICREATE_DEBUG} && diag join "\n", @{$query_stats->{SELECT} || []};
});
-}
-
done_testing;