From: Matt S Trout Date: Sun, 7 Nov 2010 04:27:44 +0000 (+0000) Subject: fix indentation in generated constructor X-Git-Tag: 0.009001~68 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=4053679e89a6202cd75f72541e352f36df072a20;p=gitmo%2FRole-Tiny.git fix indentation in generated constructor --- diff --git a/lib/Method/Generate/Constructor.pm b/lib/Method/Generate/Constructor.pm index d8578b3..a3f3bb0 100644 --- a/lib/Method/Generate/Constructor.pm +++ b/lib/Method/Generate/Constructor.pm @@ -21,9 +21,9 @@ sub generate_method { $body .= $self->_check_required($spec); $body .= ' my $new = bless({}, $class);'."\n"; $body .= $self->_assign_new($spec); - $body .= ' return $new;'; + $body .= ' return $new;'."\n"; quote_sub - "${into}::${name}" => ' '.$body."\n", + "${into}::${name}" => $body, (ref($quote_opts) ? ({}, $quote_opts) : ()) ; }