fix use of |$. #3

Merged
merged 1 commit into from Jun 23, 2013
View
4 lib/Grammar/Debugger.pm
@@ -37,14 +37,14 @@ my class DebuggedGrammarHOW is Mu is Metamodel::GrammarHOW {
my $meth := callsame;
substr($name, 0, 1) eq '!' || $name eq any(<parse CREATE BUILD Bool defined MATCH>) ??
$meth !!
- -> $c, |$args {
+ -> $c, |args {
# Method name.
say ('| ' x $!indent) ~ BOLD() ~ $name ~ RESET();
# Call rule.
self.intervene(EnterRule, $name);
$!indent++;
- my $result := $meth($c, |$args);
+ my $result := $meth($c, |args);
$!indent--;
# Dump result.