From: Graham Knop <haarg@haarg.org>
Date: Sat, 4 May 2013 19:16:18 +0000 (-0400)
Subject: fix breakage introduced by accessor fix
X-Git-Tag: v1.002000~10
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=142218d42fdb85a3394552cbcbfae6a72dc89477;p=gitmo%2FMoo.git

fix breakage introduced by accessor fix
---

diff --git a/lib/Method/Generate/Accessor.pm b/lib/Method/Generate/Accessor.pm
index 9bb8d51..4650b19 100644
--- a/lib/Method/Generate/Accessor.pm
+++ b/lib/Method/Generate/Accessor.pm
@@ -270,7 +270,7 @@ sub _generate_use_default {
       ."      ".$self->_generate_isa_check($name, '$value', $spec->{isa}).";\n"
       ."      ".$self->_generate_simple_set($me, $name, $spec, '$value')."\n"
       ."    }\n"
-    : '    '.$self->_generate_simple_set($me, $name, $spec, $get_value)."\n");
+    : '    ('.$self->_generate_simple_set($me, $name, $spec, $get_value).")\n");
 }
 
 sub _generate_get_default {