Commit | Line | Data |
63420f8c |
1 | use strict; |
2 | use warnings; |
3 | use lib 't/lib'; |
4 | use LoadTest; |
0906c32b |
5 | use Test::More tests => 10; |
63420f8c |
6 | use Devel::Dwarn; |
7 | |
8 | my $mti = LoadTest->source('Foo'); |
9 | |
10 | isa_ok( $mti, "DBIx::Class::ResultSource::MultipleTableInheritance" ); |
11 | |
12 | can_ok( $mti, |
13 | qw/new add_additional_parents add_additional_parent _source_by_name schema attach_additional_sources set_primary_key set_sequence raw_source_name raw_table_name add_columns add_relationship/ |
14 | ); |
15 | |
16 | ok( !$mti->can($_), "My helper method $_ was removed" ) |
17 | for |
18 | qw/argify qualify_with body_cols pk_cols names_of function_body arg_hash rule_body/; |
19 | |