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';
: 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;