X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMooseX%2FRole%2FParameterized%2FMeta%2FRole%2FParameterizable.pm;h=59529eeac9f0eee4122515018155536e37a6f71d;hb=592ff67cca1f2c1f0a20b4b9882ff1d9565d80be;hp=b3d3d43640fb179d77b7db21fe6e44562c20258f;hpb=6c2c483057635b2a35c2f03670fbeeb1b26a5568;p=gitmo%2FMooseX-Role-Parameterized.git diff --git a/lib/MooseX/Role/Parameterized/Meta/Role/Parameterizable.pm b/lib/MooseX/Role/Parameterized/Meta/Role/Parameterizable.pm index b3d3d43..59529ee 100644 --- a/lib/MooseX/Role/Parameterized/Meta/Role/Parameterizable.pm +++ b/lib/MooseX/Role/Parameterized/Meta/Role/Parameterizable.pm @@ -83,6 +83,15 @@ sub generate_role { return $role; } +sub role_for_combination { + my $self = shift; + my $parameters = shift; + + return $self->generate_role( + parameters => $parameters, + ); +} + sub apply { my $self = shift; my $consumer = shift;