Bump dependency for MoreUtils
Marcus Ramberg [Fri, 5 Dec 2008 13:11:32 +0000 (13:11 +0000)]
Makefile.PL
lib/Moose/Meta/Method/Accessor.pm

index c3c4137..0e4ff84 100644 (file)
@@ -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';
 
index b6852f7..fac4106 100644 (file)
@@ -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;