Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
Make Parameter.perl's default more informative
:($a = 2) became :($a = { ... }) instead before
  • Loading branch information
lizmat committed Mar 4, 2016
1 parent 7bdebae commit eac1e26
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/core/Parameter.pm
Expand Up @@ -256,7 +256,7 @@ my class Parameter { # declared in BOOTSTRAP
return Nil without $where;
$rest ~= " $where";
}
$rest ~= ' = { ... }' if $default;
$rest ~= " = $!default_value.perl()" if $default;
if $name or $rest {
$perl ~= ($perl ?? ' ' !! '') ~ $name;
}
Expand Down

0 comments on commit eac1e26

Please sign in to comment.