use utf8;
=head1 NAME
Interchange6::Schema::Candy - add DBIx::Class::Candy to our Result classes
=cut
=head1 METHODS
=head2 base
Set base to either what is set by the Result class or else to DBIx::Class::Core
=cut
# we want to know if a class tries to use a difference base class
# uncoverable branch false
sub base { $_[1] || 'DBIx::Class::Core' }
=head2 autotable
Set autotable to either what is set by the Result class or else to 1
=cut
# we want to know if a class tries to set its table name
# uncoverable branch false
sub autotable { $_[1] || 1 }
1;