From: Marcus Ramberg Date: Fri, 5 Dec 2008 13:11:32 +0000 (+0000) Subject: Bump dependency for MoreUtils X-Git-Tag: 0.62_02~7 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e8d6f353b3ad54704dd88d485cee7ade5897a12c;p=gitmo%2FMoose.git Bump dependency for MoreUtils --- diff --git a/Makefile.PL b/Makefile.PL index c3c4137..0e4ff84 100644 --- a/Makefile.PL +++ b/Makefile.PL @@ -13,7 +13,7 @@ requires 'perl' => '5.008'; requires 'Scalar::Util' => '1.19'; requires 'Carp'; requires 'Class::MOP' => '0.71_01'; -requires 'List::MoreUtils'; +requires 'List::MoreUtils' => '0.12'; requires 'Sub::Exporter' => '0.972'; requires 'Task::Weaken' => '0'; diff --git a/lib/Moose/Meta/Method/Accessor.pm b/lib/Moose/Meta/Method/Accessor.pm index b6852f7..fac4106 100644 --- a/lib/Moose/Meta/Method/Accessor.pm +++ b/lib/Moose/Meta/Method/Accessor.pm @@ -32,6 +32,7 @@ sub _eval_code { : undef; #warn "code for $attr_name =>\n" . $code . "\n"; + confess unless blessed $self; my $sub = eval $code; $self->throw_error("Could not create writer for '$attr_name' because $@ \n code: $code", error => $@, data => $code ) if $@; return $sub;