From: Jesse Luehrs Date: Thu, 21 Jun 2012 02:15:31 +0000 (-0500) Subject: stop using excludes within moose, since it's no longer necessary X-Git-Tag: 2.0800~44 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=00bbc132f9e1cb2b1a44aa287887cafa27a84577;p=gitmo%2FMoose.git stop using excludes within moose, since it's no longer necessary --- diff --git a/lib/Moose/Meta/Attribute/Native/Trait/Counter.pm b/lib/Moose/Meta/Attribute/Native/Trait/Counter.pm index 6e64e79..112ab27 100644 --- a/lib/Moose/Meta/Attribute/Native/Trait/Counter.pm +++ b/lib/Moose/Meta/Attribute/Native/Trait/Counter.pm @@ -2,8 +2,7 @@ package Moose::Meta::Attribute::Native::Trait::Counter; use Moose::Role; -with 'Moose::Meta::Attribute::Native::Trait' => - { -excludes => ['_root_types'] }; +with 'Moose::Meta::Attribute::Native::Trait'; sub _default_default { 0 } sub _default_is { 'ro' } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/Writer.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/Writer.pm index 7a727c3..353a13e 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/Writer.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/Writer.pm @@ -5,11 +5,14 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Writer' => { - -excludes => ['_inline_coerce_new_values'], - }, - 'Moose::Meta::Method::Accessor::Native::Array', - 'Moose::Meta::Method::Accessor::Native::Collection'; +with 'Moose::Meta::Method::Accessor::Native::Writer', + 'Moose::Meta::Method::Accessor::Native::Array', + 'Moose::Meta::Method::Accessor::Native::Collection'; + +sub _inline_coerce_new_values { + my $self = shift; + $self->Moose::Meta::Method::Accessor::Native::Collection::_inline_coerce_new_values(@_); +} sub _new_members { '@_' } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/accessor.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/accessor.pm index 75eba86..5767663 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/accessor.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/accessor.pm @@ -5,25 +5,23 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Array::set' => { - -excludes => [ - qw( _generate_method - _minimum_arguments - _maximum_arguments - _inline_process_arguments - _inline_check_arguments - _return_value) - ] - }, - 'Moose::Meta::Method::Accessor::Native::Array::get' => { - -excludes => [ - qw( - _generate_method - _minimum_arguments - _maximum_arguments - ) - ] - }; +with 'Moose::Meta::Method::Accessor::Native::Array::set', + 'Moose::Meta::Method::Accessor::Native::Array::get'; + +sub _inline_process_arguments { + my $self = shift; + $self->Moose::Meta::Method::Accessor::Native::Array::get::_inline_process_arguments(@_); +} + +sub _inline_check_arguments { + my $self = shift; + $self->Moose::Meta::Method::Accessor::Native::Array::get::_inline_check_arguments(@_); +} + +sub _return_value { + my $self = shift; + $self->Moose::Meta::Method::Accessor::Native::Array::get::_return_value(@_); +} sub _generate_method { my $self = shift; diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/clear.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/clear.pm index 6ebd375..bb2c5b3 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/clear.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/clear.pm @@ -5,15 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Array::Writer' => { - -excludes => [ - qw( - _maximum_arguments - _inline_optimized_set_new_value - _return_value - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Array::Writer'; sub _maximum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/count.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/count.pm index e4c51b9..0678d1e 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/count.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/count.pm @@ -5,8 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => - { -excludes => ['_maximum_arguments'] }; +with 'Moose::Meta::Method::Accessor::Native::Reader'; sub _maximum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/delete.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/delete.pm index 70cde11..43e6cd4 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/delete.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/delete.pm @@ -5,17 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Array::Writer' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - _inline_check_arguments - _inline_optimized_set_new_value - _return_value - ) - ], -}; +with 'Moose::Meta::Method::Accessor::Native::Array::Writer'; sub _minimum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/elements.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/elements.pm index 661683b..c8f4964 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/elements.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/elements.pm @@ -5,8 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => - { -excludes => ['_maximum_arguments'] }; +with 'Moose::Meta::Method::Accessor::Native::Reader'; sub _maximum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/first.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/first.pm index 0a86add..793cdd9 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/first.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/first.pm @@ -8,15 +8,7 @@ use Params::Util (); use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - _inline_check_arguments - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Reader'; sub _minimum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/first_index.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/first_index.pm index 30cefd8..afa3f24 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/first_index.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/first_index.pm @@ -8,15 +8,7 @@ use Params::Util (); use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - _inline_check_arguments - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Reader'; sub _minimum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/get.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/get.pm index 6a4e754..f4d1c85 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/get.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/get.pm @@ -7,16 +7,8 @@ use Class::MOP::MiniTrait; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - _inline_check_arguments - ) - ], - }, - 'Moose::Meta::Method::Accessor::Native::Array'; +with 'Moose::Meta::Method::Accessor::Native::Reader', + 'Moose::Meta::Method::Accessor::Native::Array'; sub _minimum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/grep.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/grep.pm index e2b61d3..b5fdc59 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/grep.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/grep.pm @@ -7,15 +7,7 @@ use Params::Util (); use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - _inline_check_arguments - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Reader'; sub _minimum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/insert.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/insert.pm index 3025947..f815dc1 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/insert.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/insert.pm @@ -5,18 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Array::Writer' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - _inline_coerce_new_values - _new_members - _inline_optimized_set_new_value - _return_value - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Array::Writer'; sub _minimum_arguments { 2 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/is_empty.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/is_empty.pm index 10fc153..68fc961 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/is_empty.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/is_empty.pm @@ -5,8 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => - { -excludes => ['_maximum_arguments'] }; +with 'Moose::Meta::Method::Accessor::Native::Reader'; sub _maximum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/join.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/join.pm index 9010aaa..c33a3f6 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/join.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/join.pm @@ -7,15 +7,7 @@ use Moose::Util (); use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - _inline_check_arguments - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Reader'; sub _minimum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/map.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/map.pm index 2b21ec5..ae0705d 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/map.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/map.pm @@ -7,15 +7,7 @@ use Params::Util (); use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - _inline_check_arguments - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Reader'; sub _minimum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/natatime.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/natatime.pm index 4bdab33..1d72cc9 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/natatime.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/natatime.pm @@ -8,16 +8,7 @@ use Params::Util (); use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - _inline_check_arguments - _inline_return_value - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Reader'; sub _minimum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/pop.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/pop.pm index c95c9c5..63cb664 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/pop.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/pop.pm @@ -5,14 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Array::Writer' => { - -excludes => [ - qw( _maximum_arguments - _inline_capture_return_value - _inline_optimized_set_new_value - _return_value ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Array::Writer'; sub _maximum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/push.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/push.pm index c3b47cc..62f14b4 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/push.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/push.pm @@ -5,14 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Array::Writer' => { - -excludes => [ - qw( - _inline_optimized_set_new_value - _return_value - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Array::Writer'; sub _adds_members { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/reduce.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/reduce.pm index b1fb7b3..71096b3 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/reduce.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/reduce.pm @@ -8,15 +8,7 @@ use Params::Util (); use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - _inline_check_arguments - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Reader'; sub _minimum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/set.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/set.pm index 33a8054..bcfe964 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/set.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/set.pm @@ -5,19 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Array::Writer' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - _inline_check_arguments - _inline_coerce_new_values - _new_members - _inline_optimized_set_new_value - _return_value - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Array::Writer'; sub _minimum_arguments { 2 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/shallow_clone.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/shallow_clone.pm index 484d271..125e9b2 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/shallow_clone.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/shallow_clone.pm @@ -7,14 +7,7 @@ use Params::Util (); use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Reader'; sub _minimum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/shift.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/shift.pm index cf02651..ea43473 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/shift.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/shift.pm @@ -5,16 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Array::Writer' => { - -excludes => [ - qw( - _maximum_arguments - _inline_capture_return_value - _inline_optimized_set_new_value - _return_value - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Array::Writer'; sub _maximum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/shuffle.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/shuffle.pm index cd3cedd..74caf43 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/shuffle.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/shuffle.pm @@ -7,8 +7,7 @@ use List::Util (); use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => - { -excludes => ['_maximum_arguments'] }; +with 'Moose::Meta::Method::Accessor::Native::Reader'; sub _maximum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/sort.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/sort.pm index 02feb9e..0c9adb0 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/sort.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/sort.pm @@ -7,14 +7,7 @@ use Params::Util (); use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => { - -excludes => [ - qw( - _maximum_arguments - _inline_check_arguments - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Reader'; sub _maximum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/sort_in_place.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/sort_in_place.pm index 4d14492..9b804b1 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/sort_in_place.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/sort_in_place.pm @@ -7,15 +7,7 @@ use Params::Util (); use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Array::Writer' => { - -excludes => [ - qw( - _maximum_arguments - _inline_check_arguments - _return_value - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Array::Writer'; sub _maximum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/splice.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/splice.pm index 59387f4..8454377 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/splice.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/splice.pm @@ -5,17 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Array::Writer' => { - -excludes => [ - qw( - _minimum_arguments - _inline_process_arguments - _inline_check_arguments - _inline_optimized_set_new_value - _return_value - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Array::Writer'; sub _minimum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/uniq.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/uniq.pm index c23c8fd..2697889 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/uniq.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/uniq.pm @@ -7,8 +7,7 @@ use List::MoreUtils (); use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => - { -excludes => ['_maximum_arguments'] }; +with 'Moose::Meta::Method::Accessor::Native::Reader'; sub _maximum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/unshift.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/unshift.pm index 55e7ae5..dbe7b4d 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/unshift.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/unshift.pm @@ -5,14 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Array::Writer' => { - -excludes => [ - qw( - _inline_optimized_set_new_value - _return_value - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Array::Writer'; sub _adds_members { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Bool/not.pm b/lib/Moose/Meta/Method/Accessor/Native/Bool/not.pm index 9f8a609..18c9ae8 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Bool/not.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Bool/not.pm @@ -5,8 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => - { -excludes => ['_maximum_arguments'] }; +with 'Moose::Meta::Method::Accessor::Native::Reader'; sub _maximum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Bool/set.pm b/lib/Moose/Meta/Method/Accessor/Native/Bool/set.pm index 6a6fe52..e14f639 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Bool/set.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Bool/set.pm @@ -5,14 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Writer' => { - -excludes => [ - qw( - _maximum_arguments - _inline_optimized_set_new_value - ) - ] - }; +with 'Moose::Meta::Method::Accessor::Native::Writer'; sub _maximum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Bool/toggle.pm b/lib/Moose/Meta/Method/Accessor/Native/Bool/toggle.pm index 3d43bd9..6f39ed1 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Bool/toggle.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Bool/toggle.pm @@ -5,14 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Writer' => { - -excludes => [ - qw( - _maximum_arguments - _inline_optimized_set_new_value - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Writer'; sub _maximum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Bool/unset.pm b/lib/Moose/Meta/Method/Accessor/Native/Bool/unset.pm index ec17f55..d49a796 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Bool/unset.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Bool/unset.pm @@ -5,14 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Writer' => { - -excludes => [ - qw( - _maximum_arguments - _inline_optimized_set_new_value - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Writer'; sub _maximum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Counter/dec.pm b/lib/Moose/Meta/Method/Accessor/Native/Counter/dec.pm index d45494d..4b347a5 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Counter/dec.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Counter/dec.pm @@ -5,15 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Writer' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - _inline_optimized_set_new_value - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Writer'; sub _minimum_arguments { 0 } sub _maximum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Counter/inc.pm b/lib/Moose/Meta/Method/Accessor/Native/Counter/inc.pm index ba4a40b..8fc0410 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Counter/inc.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Counter/inc.pm @@ -5,15 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Writer' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - _inline_optimized_set_new_value - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Writer'; sub _minimum_arguments { 0 } sub _maximum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Counter/reset.pm b/lib/Moose/Meta/Method/Accessor/Native/Counter/reset.pm index 4689c51..f159623 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Counter/reset.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Counter/reset.pm @@ -5,14 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Writer' => { - -excludes => [ - qw( - _maximum_arguments - _inline_optimized_set_new_value - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Writer'; sub _maximum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Counter/set.pm b/lib/Moose/Meta/Method/Accessor/Native/Counter/set.pm index 0cf63f1..d5b70ad 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Counter/set.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Counter/set.pm @@ -5,15 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Writer' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - _inline_optimized_set_new_value - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Writer'; sub _minimum_arguments { 1 } sub _maximum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Hash/Writer.pm b/lib/Moose/Meta/Method/Accessor/Native/Hash/Writer.pm index babf346..4669788 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Hash/Writer.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Hash/Writer.pm @@ -7,11 +7,14 @@ use Class::MOP::MiniTrait; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Writer' => { - -excludes => ['_inline_coerce_new_values'], - }, - 'Moose::Meta::Method::Accessor::Native::Hash', - 'Moose::Meta::Method::Accessor::Native::Collection'; +with 'Moose::Meta::Method::Accessor::Native::Writer', + 'Moose::Meta::Method::Accessor::Native::Hash', + 'Moose::Meta::Method::Accessor::Native::Collection'; + +sub _inline_coerce_new_values { + my $self = shift; + $self->Moose::Meta::Method::Accessor::Native::Collection::_inline_coerce_new_values(@_); +} sub _new_values { '@values' } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Hash/accessor.pm b/lib/Moose/Meta/Method/Accessor/Native/Hash/accessor.pm index 3632eec..9ed17e5 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Hash/accessor.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Hash/accessor.pm @@ -5,28 +5,28 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Hash::set' => { - -excludes => [ - qw( - _generate_method - _minimum_arguments - _maximum_arguments - ) - ] - }, - 'Moose::Meta::Method::Accessor::Native::Hash::get' => { - -excludes => [ - qw( - _generate_method - _minimum_arguments - _maximum_arguments - _inline_check_argument_count - _inline_check_arguments - _inline_process_arguments - _return_value - ) - ] - }; +with 'Moose::Meta::Method::Accessor::Native::Hash::set', + 'Moose::Meta::Method::Accessor::Native::Hash::get'; + +sub _inline_process_arguments { + my $self = shift; + $self->Moose::Meta::Method::Accessor::Native::Hash::set::_inline_process_arguments(@_); +} + +sub _inline_check_argument_count { + my $self = shift; + $self->Moose::Meta::Method::Accessor::Native::Hash::set::_inline_check_argument_count(@_); +} + +sub _inline_check_arguments { + my $self = shift; + $self->Moose::Meta::Method::Accessor::Native::Hash::set::_inline_check_arguments(@_); +} + +sub _return_value { + my $self = shift; + $self->Moose::Meta::Method::Accessor::Native::Hash::set::_return_value(@_); +} sub _generate_method { my $self = shift; diff --git a/lib/Moose/Meta/Method/Accessor/Native/Hash/clear.pm b/lib/Moose/Meta/Method/Accessor/Native/Hash/clear.pm index 708688c..4ba8fb9 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Hash/clear.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Hash/clear.pm @@ -5,15 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Hash::Writer' => { - -excludes => [ - qw( - _maximum_arguments - _inline_optimized_set_new_value - _return_value - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Hash::Writer'; sub _maximum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Hash/count.pm b/lib/Moose/Meta/Method/Accessor/Native/Hash/count.pm index c4927e0..af858ce 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Hash/count.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Hash/count.pm @@ -7,8 +7,7 @@ use Scalar::Util qw( looks_like_number ); use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => - { -excludes => ['_maximum_arguments'] }; +with 'Moose::Meta::Method::Accessor::Native::Reader'; sub _maximum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Hash/defined.pm b/lib/Moose/Meta/Method/Accessor/Native/Hash/defined.pm index 1a1548b..7bdc856 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Hash/defined.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Hash/defined.pm @@ -7,16 +7,8 @@ use Scalar::Util qw( looks_like_number ); use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - _inline_check_arguments - ) - ], - }, - 'Moose::Meta::Method::Accessor::Native::Hash'; +with 'Moose::Meta::Method::Accessor::Native::Reader', + 'Moose::Meta::Method::Accessor::Native::Hash'; sub _minimum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Hash/delete.pm b/lib/Moose/Meta/Method/Accessor/Native/Hash/delete.pm index 4cc2f28..e471a0a 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Hash/delete.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Hash/delete.pm @@ -5,14 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Hash::Writer' => { - -excludes => [ - qw( - _inline_optimized_set_new_value - _return_value - ) - ], -}; +with 'Moose::Meta::Method::Accessor::Native::Hash::Writer'; sub _adds_members { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Hash/elements.pm b/lib/Moose/Meta/Method/Accessor/Native/Hash/elements.pm index 25fc6aa..441159a 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Hash/elements.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Hash/elements.pm @@ -7,8 +7,7 @@ use Scalar::Util qw( looks_like_number ); use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => - { -excludes => ['_maximum_arguments'] }; +with 'Moose::Meta::Method::Accessor::Native::Reader'; sub _maximum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Hash/exists.pm b/lib/Moose/Meta/Method/Accessor/Native/Hash/exists.pm index 832067d..053965b 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Hash/exists.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Hash/exists.pm @@ -7,16 +7,8 @@ use Scalar::Util qw( looks_like_number ); use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - _inline_check_arguments - ) - ], - }, - 'Moose::Meta::Method::Accessor::Native::Hash'; +with 'Moose::Meta::Method::Accessor::Native::Reader', + 'Moose::Meta::Method::Accessor::Native::Hash'; sub _minimum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Hash/get.pm b/lib/Moose/Meta/Method/Accessor/Native/Hash/get.pm index 73c9031..7df4d9e 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Hash/get.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Hash/get.pm @@ -7,15 +7,8 @@ use Scalar::Util qw( looks_like_number ); use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => { - -excludes => [ - qw( - _minimum_arguments - _inline_check_arguments - ) - ], - }, - 'Moose::Meta::Method::Accessor::Native::Hash'; +with 'Moose::Meta::Method::Accessor::Native::Reader', + 'Moose::Meta::Method::Accessor::Native::Hash'; sub _minimum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Hash/is_empty.pm b/lib/Moose/Meta/Method/Accessor/Native/Hash/is_empty.pm index 788ea61..9141cab 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Hash/is_empty.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Hash/is_empty.pm @@ -7,8 +7,7 @@ use Scalar::Util qw( looks_like_number ); use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => - { -excludes => ['_maximum_arguments'] }; +with 'Moose::Meta::Method::Accessor::Native::Reader'; sub _maximum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Hash/keys.pm b/lib/Moose/Meta/Method/Accessor/Native/Hash/keys.pm index d446bd0..43ed051 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Hash/keys.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Hash/keys.pm @@ -7,8 +7,7 @@ use Scalar::Util qw( looks_like_number ); use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => - { -excludes => ['_maximum_arguments'] }; +with 'Moose::Meta::Method::Accessor::Native::Reader'; sub _maximum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Hash/kv.pm b/lib/Moose/Meta/Method/Accessor/Native/Hash/kv.pm index 59628ff..01daf31 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Hash/kv.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Hash/kv.pm @@ -7,8 +7,7 @@ use Scalar::Util qw( looks_like_number ); use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => - { -excludes => ['_maximum_arguments'] }; +with 'Moose::Meta::Method::Accessor::Native::Reader'; sub _maximum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Hash/set.pm b/lib/Moose/Meta/Method/Accessor/Native/Hash/set.pm index 7bbde96..3185f32 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Hash/set.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Hash/set.pm @@ -8,19 +8,7 @@ use Scalar::Util qw( looks_like_number ); use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Hash::Writer' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - _inline_process_arguments - _inline_check_arguments - _inline_coerce_new_values - _inline_optimized_set_new_value - _return_value - ) - ], -}; +with 'Moose::Meta::Method::Accessor::Native::Hash::Writer'; sub _minimum_arguments { 2 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Hash/shallow_clone.pm b/lib/Moose/Meta/Method/Accessor/Native/Hash/shallow_clone.pm index 7191ea3..0210963 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Hash/shallow_clone.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Hash/shallow_clone.pm @@ -7,14 +7,7 @@ use Params::Util (); use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Reader'; sub _minimum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Hash/values.pm b/lib/Moose/Meta/Method/Accessor/Native/Hash/values.pm index 57e9336..8931cbd 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Hash/values.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Hash/values.pm @@ -7,8 +7,7 @@ use Scalar::Util qw( looks_like_number ); use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => - { -excludes => ['_maximum_arguments'] }; +with 'Moose::Meta::Method::Accessor::Native::Reader'; sub _maximum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Number/abs.pm b/lib/Moose/Meta/Method/Accessor/Native/Number/abs.pm index 527eb65..40d1ccd 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Number/abs.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Number/abs.pm @@ -5,14 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Writer' => { - -excludes => [ - qw( - _maximum_arguments - _inline_optimized_set_new_value - ) - ] - }; +with 'Moose::Meta::Method::Accessor::Native::Writer'; sub _maximum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Number/add.pm b/lib/Moose/Meta/Method/Accessor/Native/Number/add.pm index 32c9cd8..97aa7ef 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Number/add.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Number/add.pm @@ -5,15 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Writer' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - _inline_optimized_set_new_value - ) - ] - }; +with 'Moose::Meta::Method::Accessor::Native::Writer'; sub _minimum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Number/div.pm b/lib/Moose/Meta/Method/Accessor/Native/Number/div.pm index 482a4dd..cbbcba1 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Number/div.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Number/div.pm @@ -5,15 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Writer' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - _inline_optimized_set_new_value - ) - ] - }; +with 'Moose::Meta::Method::Accessor::Native::Writer'; sub _minimum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Number/mod.pm b/lib/Moose/Meta/Method/Accessor/Native/Number/mod.pm index c8ad5a7..c6f81e0 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Number/mod.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Number/mod.pm @@ -5,15 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Writer' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - _inline_optimized_set_new_value - ) - ] - }; +with 'Moose::Meta::Method::Accessor::Native::Writer'; sub _minimum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Number/mul.pm b/lib/Moose/Meta/Method/Accessor/Native/Number/mul.pm index d5affe1..d43c229 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Number/mul.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Number/mul.pm @@ -5,15 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Writer' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - _inline_optimized_set_new_value - ) - ] - }; +with 'Moose::Meta::Method::Accessor::Native::Writer'; sub _minimum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Number/set.pm b/lib/Moose/Meta/Method/Accessor/Native/Number/set.pm index 13731cc..114a51a 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Number/set.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Number/set.pm @@ -5,15 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Writer' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - _inline_optimized_set_new_value - ) - ] - }; +with 'Moose::Meta::Method::Accessor::Native::Writer'; sub _minimum_arguments { 1 } sub _maximum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/Number/sub.pm b/lib/Moose/Meta/Method/Accessor/Native/Number/sub.pm index 768c4bd..5a19a58 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Number/sub.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Number/sub.pm @@ -5,15 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Writer' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - _inline_optimized_set_new_value - ) - ] - }; +with 'Moose::Meta::Method::Accessor::Native::Writer'; sub _minimum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/String/append.pm b/lib/Moose/Meta/Method/Accessor/Native/String/append.pm index 9f311fa..f203c44 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/String/append.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/String/append.pm @@ -5,15 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Writer' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - _inline_optimized_set_new_value - ) - ] - }; +with 'Moose::Meta::Method::Accessor::Native::Writer'; sub _minimum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/String/chomp.pm b/lib/Moose/Meta/Method/Accessor/Native/String/chomp.pm index 8efbd79..f1eb78f 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/String/chomp.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/String/chomp.pm @@ -5,15 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Writer' => { - -excludes => [ - qw( - _maximum_arguments - _inline_optimized_set_new_value - _return_value - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Writer'; sub _maximum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/String/chop.pm b/lib/Moose/Meta/Method/Accessor/Native/String/chop.pm index e8a6f58..cb3ed8c 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/String/chop.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/String/chop.pm @@ -5,15 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Writer' => { - -excludes => [ - qw( - _maximum_arguments - _inline_optimized_set_new_value - _return_value - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Writer'; sub _maximum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/String/clear.pm b/lib/Moose/Meta/Method/Accessor/Native/String/clear.pm index 2145b08..c82f9b9 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/String/clear.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/String/clear.pm @@ -5,14 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Writer' => { - -excludes => [ - qw( - _maximum_arguments - _inline_optimized_set_new_value - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Writer'; sub _maximum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/String/inc.pm b/lib/Moose/Meta/Method/Accessor/Native/String/inc.pm index f3b6eb2..bea32b4 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/String/inc.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/String/inc.pm @@ -5,14 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Writer' => { - -excludes => [ - qw( - _maximum_arguments - _inline_optimized_set_new_value - ) - ] - }; +with 'Moose::Meta::Method::Accessor::Native::Writer'; sub _maximum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/String/length.pm b/lib/Moose/Meta/Method/Accessor/Native/String/length.pm index ee90eb2..1d45b55 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/String/length.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/String/length.pm @@ -5,8 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => - { -excludes => ['_maximum_arguments'] }; +with 'Moose::Meta::Method::Accessor::Native::Reader'; sub _maximum_arguments { 0 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/String/match.pm b/lib/Moose/Meta/Method/Accessor/Native/String/match.pm index 3cf4e5b..b87a59e 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/String/match.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/String/match.pm @@ -8,15 +8,7 @@ use Params::Util (); use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - _inline_check_arguments - ) - ] -}; +with 'Moose::Meta::Method::Accessor::Native::Reader'; sub _minimum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/String/prepend.pm b/lib/Moose/Meta/Method/Accessor/Native/String/prepend.pm index c3d7112..24a4755 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/String/prepend.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/String/prepend.pm @@ -5,15 +5,7 @@ use warnings; use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Writer' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - _inline_optimized_set_new_value - ) - ] - }; +with 'Moose::Meta::Method::Accessor::Native::Writer'; sub _minimum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/String/replace.pm b/lib/Moose/Meta/Method/Accessor/Native/String/replace.pm index 87225cf..b00d96d 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/String/replace.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/String/replace.pm @@ -8,16 +8,7 @@ use Params::Util (); use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Writer' => { - -excludes => [ - qw( - _minimum_arguments - _maximum_arguments - _inline_check_arguments - _inline_optimized_set_new_value - ) - ] - }; +with 'Moose::Meta::Method::Accessor::Native::Writer'; sub _minimum_arguments { 1 } diff --git a/lib/Moose/Meta/Method/Accessor/Native/String/substr.pm b/lib/Moose/Meta/Method/Accessor/Native/String/substr.pm index a590844..7eeecbb 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/String/substr.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/String/substr.pm @@ -7,30 +7,8 @@ use Moose::Util (); use Moose::Role; -with 'Moose::Meta::Method::Accessor::Native::Reader' => { - -excludes => [ - qw( _generate_method - _minimum_arguments - _maximum_arguments - _inline_process_arguments - _inline_check_arguments - _return_value - ) - ] - }, - 'Moose::Meta::Method::Accessor::Native::Writer' => { - -excludes => [ - qw( - _generate_method - _minimum_arguments - _maximum_arguments - _inline_process_arguments - _inline_check_arguments - _inline_optimized_set_new_value - _return_value - ) - ] - }; +with 'Moose::Meta::Method::Accessor::Native::Reader', + 'Moose::Meta::Method::Accessor::Native::Writer'; sub _generate_method { my $self = shift;