Fix complete breakage of ddl_filename on certain paths
[dbsrgits/DBIx-Class-Historic.git] / t / cdbi / early_column_heisenbug.t
CommitLineData
96eab6f8 1use strict;
2
3use Test::More;
4
5BEGIN {
6 eval "use DBIx::Class::CDBICompat;";
89bddb49 7 plan skip_all => "Class::Trigger and DBIx::ContextualFetch required: $@" if $@;
96eab6f8 8}
9
10
11{
12 package Thing;
13 use base qw(DBIx::Class::CDBICompat);
14}
15
16{
17 package Stuff;
18 use base qw(DBIx::Class::CDBICompat);
19}
20
21# There was a bug where looking at a column group before any were
22# set would cause them to be shared across classes.
23is_deeply [Stuff->columns("Essential")], [];
24Thing->columns(Essential => qw(foo bar baz));
25is_deeply [Stuff->columns("Essential")], [];
26
89bddb49 27done_testing;