use Moose::Role;
use Moose::Util::TypeConstraints;
-our $VERSION = '0.17';
+our $VERSION = '0.23';
$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
};
},
);
-# extend the parents stuff to make sure
-# certain bits are now required ...
-has '+default' => (required => 1);
-has '+type_constraint' => (required => 1);
-
## Methods called prior to instantiation
sub process_options_for_provides {
$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);
}
=head1 COPYRIGHT AND LICENSE
-Copyright 2007-2008 by Infinity Interactive, Inc.
+Copyright 2007-2009 by Infinity Interactive, Inc.
L<http://www.iinteractive.com>