Alternate fix for PR #720, kalkin++

rakudo · Mar 4, 2016 · 7bdebae · 7bdebae
1 parent 676ad66
commit 7bdebae
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/core/Main.pm b/src/core/Main.pm
@@ -70,7 +70,7 @@ my sub MAIN_HELPER($retval = 0) {
                 my $argument;
                 if $param.named {
                     if $param.slurpy {
-                        $argument  = '--<' ~ substr($param.name,1) ~ '>=...';
+                        $argument  = "--<$param.usage-name()>=...";
                         @optional-named.push("[$argument]");
                     }
                     else {
@@ -88,7 +88,7 @@ my sub MAIN_HELPER($retval = 0) {
                 else {
                     my $constraints  = $param.constraint_list.map(*.gist).join(' ');
                     my $simple-const = $constraints && $constraints !~~ /^_block/;
-                    $argument = $param.name   ?? '<' ~ substr($param.name,1) ~ '>' !!
+                    $argument = $param.name   ?? "<$param.usage-name()>" !!
                                 $simple-const ??       $constraints                !!
                                                  '<' ~ $param.type.^name     ~ '>' ;