/usr/local/CPAN/DBIx-Class-Fixtures/DBIx/Class/Fixtures/DBI.pm

• package DBIx::Class::Fixtures::DBI
  • do_insert
• EOF

package DBIx::Class::Fixtures::DBI;

use strict;
use warnings;

sub do_insert {
  my ($class, $schema, $sub) = @_;

  $schema->txn_do($sub);
}

1;