4 use Test::More tests => 4;
25 throws_ok { Mouse::Util::apply_all_roles('Baz', 'BarRole', 'FooRole') } qr{Mouse::Util only supports 'apply_all_roles' on individual roles at a time};
27 Mouse::Util::apply_all_roles('Baz', 'BarRole');
28 Mouse::Util::apply_all_roles('Baz', 'FooRole');
33 is join(",", sort $baz->meta->get_method_list), 'bar,foo';