Remove a useless eval block
Dave Rolsky [Sun, 21 Jun 2009 15:54:27 +0000 (10:54 -0500)]
lib/Class/MOP/Method/Accessor.pm

index a6ef5ea..1f71913 100644 (file)
@@ -73,8 +73,7 @@ sub _initialize_body {
         ($self->is_inline ? 'inline' : ())
     );
 
-    eval { $self->{'body'} = $self->$method_name() };
-    die $@ if $@;
+    $self->{'body'} = $self->$method_name();
 }
 
 ## generators