From: Shawn M Moore Date: Tue, 2 Dec 2008 08:56:41 +0000 (+0000) Subject: Minor fixes X-Git-Tag: 0.05~55 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=7557429da07d702f82fab98c349c69970f186204;p=gitmo%2FMooseX-Role-Parameterized.git Minor fixes --- 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;