- my $shredder = shredder_new();
- $shredder->PutObjects( Objects => $template );
- $shredder->WipeoutAll;
- cmp_deeply( dump_current_and_savepoint('clean'), "current DB equal to savepoint");
+ my $shredder = $test->shredder_new();
+ $shredder->PutObjects( Objects => $template );
+ $shredder->WipeoutAll;
+ $test->db_is_valid;
+ cmp_deeply( $test->dump_current_and_savepoint('clean'), "current DB equal to savepoint");