projects
/
gitmo/MooseX-StrictConstructor.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
(parent:
eb640f6
)
If I'm using override might as well use super() too.
Dave Rolsky [Mon, 17 Dec 2007 20:35:29 +0000 (20:35 +0000)]
lib/MooseX/StrictConstructor/Meta/Method/Constructor.pm
patch
|
blob
|
blame
|
history
diff --git
a/lib/MooseX/StrictConstructor/Meta/Method/Constructor.pm
b/lib/MooseX/StrictConstructor/Meta/Method/Constructor.pm
index
45b1fd8
..
970bd9c
100644
(file)
--- a/
lib/MooseX/StrictConstructor/Meta/Method/Constructor.pm
+++ b/
lib/MooseX/StrictConstructor/Meta/Method/Constructor.pm
@@
-12,7
+12,7
@@
override '_generate_BUILDALL' => sub ## no critic RequireArgUnpacking
{
my $self = shift;
- my $source = $self->SUPER::_generate_BUILDALL(@_);
+ my $source = super();
$source .= ";\n" if $source;
my @attrs = map { $_->name() . ' => 1,' } @{ $self->attributes() };