6 eval "use DBIx::Class::CDBICompat;";
7 plan $@ ? (skip_all => "Class::Trigger and DBIx::ContextualFetch required: $@")
14 use base qw(DBIx::Class::CDBICompat);
19 use base qw(DBIx::Class::CDBICompat);
22 # There was a bug where looking at a column group before any were
23 # set would cause them to be shared across classes.
24 is_deeply [Stuff->columns("Essential")], [];
25 Thing->columns(Essential => qw(foo bar baz));
26 is_deeply [Stuff->columns("Essential")], [];