3
0
mirror of https://github.com/pragma-/pbot.git synced 2024-11-30 07:49:38 +01:00

Fix "an UTF"/"an union" with "a UTF"/"a union", etc

This commit is contained in:
Pragmatic Software 2015-09-12 06:18:34 -07:00
parent ddeb70f1e3
commit d3944d82d9

View File

@ -65,6 +65,8 @@ foreach my $arg (@ARGV) {
my @quotes; my @quotes;
$output =~ s/(?:\"((?:\\\"|(?!\").)*)\")/push @quotes, $1; '"' . ('-' x length $1) . '"'/ge; $output =~ s/(?:\"((?:\\\"|(?!\").)*)\")/push @quotes, $1; '"' . ('-' x length $1) . '"'/ge;
$output =~ s/\ban un/a un/g;
$output =~ s/\ban UTF/a UTF/g;
$output =~ s/the value the expression/the value of the expression/g; $output =~ s/the value the expression/the value of the expression/g;
$output =~ s/the value the member/the value of the member/g; $output =~ s/the value the member/the value of the member/g;
$output =~ s/the value the/the/g; $output =~ s/the value the/the/g;