3
0
mirror of https://github.com/pragma-/pbot.git synced 2024-10-01 17:16:39 +02:00

Add missing $got_sub = 1 to replace block

This commit is contained in:
Pragmatic Software 2010-05-16 04:43:23 +00:00
parent 24527569ab
commit b1e9ed4e80

View File

@ -137,6 +137,7 @@ my $prevchange = $last_code[0];
my $got_changes = 0;
while($subcode =~ m/^\s*(and)?\s*replace\s*([^']+)?\s*'.*'\s*with\s*'.*'/i) {
$got_sub = 1;
my $modifier = 'first';
$subcode =~ s/^\s*(and)?\s*//;