diff --git a/src/Regex/P6Regex/Actions.pm b/src/Regex/P6Regex/Actions.pm index b4b79e2..eb942c3 100644 --- a/src/Regex/P6Regex/Actions.pm +++ b/src/Regex/P6Regex/Actions.pm @@ -546,8 +546,7 @@ sub backmod($ast, $backmod) { } sub subrule_alias($past, $name) { - if $past { $name := $name ~ '=' ~ $past.name; } - $past.name($name); + if $past.name gt '' { $past.name( $name ~ '=' ~ $past.name ); } + else { $past.name($name); } $past.subtype('capture'); - $past := 1; }