mirror of
https://github.com/perlbot/perlbuut
synced 2025-06-07 19:05:50 -04:00
wrong return value
This commit is contained in:
parent
f1e646dd48
commit
6e6f1b0c31
1 changed files with 2 additions and 0 deletions
|
@ -347,6 +347,8 @@ sub _fact_substitute
|
|||
$realsubst =~ s/$(\d+)/$caps[$1]/eg;
|
||||
|
||||
$pred =~ s/$match/$realsubst/;
|
||||
|
||||
return $pred;
|
||||
}
|
||||
else
|
||||
{
|
||||
|
|
Loading…
Add table
Reference in a new issue