Whoops, forgot a/an in Factoid expansion replacement

This commit is contained in:
Pragmatic Software 2018-03-24 17:37:47 -07:00
parent 2385ef4822
commit 31e38bf2fe
1 changed files with 2 additions and 2 deletions

View File

@ -485,9 +485,9 @@ sub expand_factoid_vars {
}
if (not length $mylist[$line]) {
substr($action, $offset) =~ s/\s+\$$v$modifier//;
substr($action, $offset) =~ s/\s*$a\$$v$modifier//;
} else {
substr($action, $offset) =~ s/\$$v$modifier/$mylist[$line]/;
substr($action, $offset) =~ s/$a\$$v$modifier/$mylist[$line]/;
}
$offset = $+[0];
}