use t::Utils;
use Test::More;
{
package Mock::Mixin;
use DBIx::Skinny connect_info => +{
dsn => 'dbi:SQLite:',
username => '',
password => '',
};
use DBIx::Skinny::Mixin modules => ['+Mixin::Foo'];
sub setup_test_db {
shift->do(q{
CREATE TABLE mock_mixin (
id INT,
name TEXT
)
});
}
package Mock::Mixin::Schema;
use utf8;
use DBIx::Skinny::Schema;
install_table mock_mixin => schema {
pk 'id';
columns qw/
id
name
/;
};
}
subtest 'mixin Mixin::Foo module' => sub {
can_ok 'Mock::Mixin', 'foo';
is +Mock::Mixin->foo, 'foo';
};
done_testing;