use Moose::Role;
use Moose::Util::TypeConstraints;
-our $VERSION = '0.19';
+our $VERSION = '0.21';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
return +{
map {
$_ => $method_provider->get_method($_)
- } $method_provider->get_method_list
+ }
+ grep { $_ ne 'meta' } $method_provider->get_method_list
};
},
);
$method_code = $attr->_curry_sub($body, $curried_arg);
}
else {
- confess "curries parameter must be ref type HASH or CODE";
+ confess "curries parameter must be ref type ARRAY or CODE";
}
my $method = MooseX::AttributeHelpers::Meta::Method::Curried->wrap(
package_name => $class_name,
name => $curried_name,
);
-
+
$attr->associate_method($method);
$class->add_method($curried_name => $method);
}