has
'is_dynamic_schema'
=> (
is
=>
'rw'
,
isa
=> Bool);
sub
_build_dbh {
}
sub
_build_database { }
sub
_build_driver { }
sub
drop_schema {
}
sub
reset_schema {
}
sub
get_client_to_deploy {
}
sub
deploy_by_client {
}
sub
create_database { }
sub
drop_database { }
1;
my
$backend
= new_ok(
'TestBackend'
);
my
@required_by_role
=
qw(_build_database _build_dbh _build_driver
drop_schema get_client_to_deploy deploy_by_client
create_database drop_database is_dynamic_schema)
;
my
@consumed_from_role
=
qw(reset_schema driver_dsn dbh dbi_attributes database driver ddl user password dsn deploy_schema deploy_by_dbi)
;
can_ok(
$backend
,
@required_by_role
);
can_ok(
$backend
,
@consumed_from_role
);