6 use Test::More tests => 8;
11 my $schema = DBICTest->init_schema();
12 my $storage = $schema->storage;
16 is $_[1], $storage->dbh;
26 my $storage_class = ref $storage;
29 *{$storage_class .'::__test_method'} = $test_func;
31 $storage->dbh_do("__test_method", "foo", "bar");