X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMooseX%2FRole%2FParameterized.pm;h=e39aeb6a7f0291618f4fca756ebd212c3f8bbe72;hb=7557429da07d702f82fab98c349c69970f186204;hp=7080b666539ace15b3962ab2cef9bc8389639a21;hpb=9ba16fb4e3ea2e77b3982eaab88f06263002ff1e;p=gitmo%2FMooseX-Role-Parameterized.git diff --git a/lib/MooseX/Role/Parameterized.pm b/lib/MooseX/Role/Parameterized.pm index 7080b66..e39aeb6 100644 --- a/lib/MooseX/Role/Parameterized.pm +++ b/lib/MooseX/Role/Parameterized.pm @@ -1,8 +1,10 @@ -#!/usr/bin/env perl package MooseX::Role::Parameterized; + +# ABSTRACT: parameterized roles, at long last + use Moose ( extends => { -as => 'moose_extends' }, - around => { -as => 'moose_around' }, + around => { -as => 'moose_around' }, qw/confess blessed/, ); @@ -16,7 +18,11 @@ our $CURRENT_METACLASS; __PACKAGE__->setup_import_methods( with_caller => ['parameter', 'role', 'method'], - as_is => ['has', 'with', 'extends', 'requires', 'excludes', 'augment', 'inner', 'before', 'after', 'around', 'super', 'override', 'confess', 'blessed'], + as_is => [ + 'has', 'with', 'extends', 'requires', 'excludes', 'augment', 'inner', + 'before', 'after', 'around', 'super', 'override', 'confess', + 'blessed', + ], ); sub parameter { @@ -174,10 +180,6 @@ sub augment { croak "Roles cannot support 'augment'" } __END__ -=head1 NAME - -MooseX::Role::Parameterized - parameterized roles, at long last - =head1 SYNOPSIS package MyRole::Counter;