From: Dave Rolsky <autarch@urth.org>
Date: Sun, 21 Jun 2009 15:54:27 +0000 (-0500)
Subject: Remove a useless eval block
X-Git-Tag: 0.87~7
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=1be5f78fa0dcbe0f85a8dceac45c4cf759b11a6e;p=gitmo%2FClass-MOP.git

Remove a useless eval block
---

diff --git a/lib/Class/MOP/Method/Accessor.pm b/lib/Class/MOP/Method/Accessor.pm
index a6ef5ea..1f71913 100644
--- a/lib/Class/MOP/Method/Accessor.pm
+++ b/lib/Class/MOP/Method/Accessor.pm
@@ -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