use Carp ();
use Scalar::Util 'blessed', 'weaken', 'looks_like_number', 'refaddr';
-our $VERSION = '1.15';
+our $VERSION = '1.16';
our $AUTHORITY = 'cpan:STEVAN';
use base 'Moose::Meta::Method',
and ( !$buildargs or $buildargs->body == \&Moose::Object::BUILDARGS )
) {
- # This is basically a copy of Moose::Object::BUILDARGS wrapped in a do
- # {} block.
+ # This is the same logic as Moose::Object::BUILDARGS
return sprintf( <<'EOF', $self->_inline_throw_error( q{'Single parameters to new() must be a HASH ref'}, 'data => $_[0]' ) );
do {
my $params;