1 BEGIN { do "./t/lib/ANFANG.pm" or die ( $@ || $! ) }
3 BEGIN { delete $ENV{DBIC_ASSERT_NO_FAILING_SANITY_CHECKS} }
10 use DBICTest::Util 'capture_stderr';
15 package DBICTest::Some::BaseResult;
16 use base "DBIx::Class::Core";
19 __PACKAGE__->load_components(qw( FilterColumn InflateColumn::DateTime ));
23 package DBICTest::Some::Result;
24 use base "DBICTest::Some::BaseResult";
26 __PACKAGE__->table("sometable");
28 __PACKAGE__->add_columns(
29 somecolumn => { data_type => "datetime" },
34 package DBICTest::Some::Schema;
35 use base "DBIx::Class::Schema";
36 __PACKAGE__->schema_sanity_checker("DBIx::Class::Schema::SanityChecker");
37 __PACKAGE__->register_class( some_result => "DBICTest::Some::Result" );
42 DBICTest::Some::Schema->connection(sub {} );
44 qr/Class 'DBICTest::Some::Result' was originally using the 'dfs' MRO affecting .+ register_column\(\)/,
45 'Proper incorrect composition warning emitted on StdErr'