Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss
Annoying warning in Moose::Meta::Attribute; our $VERSION = '2.1604'
4 views
Skip to first unread message
sh...@comcast.net
Jan 18, 2016, 1:30:01 PM1/18/16
to mo...@perl.org
Hi,
I see the following when calling $self->meta->add_attribute in my code under perl 5.10.1:
Use of uninitialized value in string eq at .../perl-5.10.1/lib/site_perl/5.10.1/x86_64-linux/Moose/Meta/Attribute.pm line 1035.
I think the following code segment:
if (
$method
&& !$method->is_stub
&& !$method->isa('Class::MOP::Method::Accessor')
&& ( !$self->definition_context
|| $method->package_name eq $self->definition_context->{package} )
) {
should look like:
if (
$method
&& !$method->is_stub
&& !$method->isa('Class::MOP::Method::Accessor')
&& ( !$self->definition_context
|| exists(self->definition_context->{package}) && $method->package_name eq $self->definition_context->{package} )
) {
--
Yuri
0 new messages