X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMouse%2FMeta%2FMethod%2FDestructor.pm;h=09e23bc938c87d28430d3e0fcfb38ca987fa5751;hb=b3b74cc602b1f2490396e407aa38970b5aa6921a;hp=623e7d7a7687dc447c0735f7710e1ddacdf5c026;hpb=bbf64e76e08d76a06b35685f878fda243abc87c2;p=gitmo%2FMouse.git diff --git a/lib/Mouse/Meta/Method/Destructor.pm b/lib/Mouse/Meta/Method/Destructor.pm index 623e7d7..09e23bc 100644 --- a/lib/Mouse/Meta/Method/Destructor.pm +++ b/lib/Mouse/Meta/Method/Destructor.pm @@ -16,7 +16,7 @@ sub generate_destructor_method_inline { } join "\n", @code; } else { - ''; # no demolish =) + return; # no demolish =) } }; @@ -31,7 +31,7 @@ sub generate_destructor_method_inline { local $@; my $res = eval $code; die $@ if $@; - $res; + return $res; } 1;