Fix inGroup expansion (#2378)
This commit is contained in:
parent
231ec50d63
commit
808f6e870b
|
@ -623,7 +623,7 @@ sub substitute {
|
|||
$expr =~ s/\bskip\b/q\{999_SKIP\}/g;
|
||||
|
||||
# handle inGroup
|
||||
$expr =~ s/\binGroup\(([^)]*)\)/listMatch(\$s->{'hGroups'},$1,1),/g;
|
||||
$expr =~ s/\binGroup\(([^)]*)\)/listMatch(\$s->{'hGroups'},$1,1)/g;
|
||||
|
||||
return $expr;
|
||||
}
|
||||
|
|
Loading…
Reference in New Issue
Block a user