X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMethod%2FGenerate%2FAccessor.pm;fp=lib%2FMethod%2FGenerate%2FAccessor.pm;h=4650b19805a6bec9f6e7324be2088ffef07bee04;hb=142218d42fdb85a3394552cbcbfae6a72dc89477;hp=9bb8d51cf2adf01468b5fe1ccad5174d7e8bf4d3;hpb=a2711acc6bc0e71f3fdc08174c1185bec0b54bec;p=gitmo%2FMoo.git 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 {