Adjust grep syntax to be able to run it with Perl 5.16.3.
[c:skip]
* tools/dist/backport.pl
(vote) Adjust grep syntax to be able to run it with Perl 5.16.3.
@@ -791,7 +791,7 @@ sub vote {
# Add to state votes that aren't '+0' or 'edit'
$state->{$_->{digest}}++ for grep
- ($_->{approval} or $_->{vote} =~ /^(-1|-0|[+]1)$/),
+ +($_->{approval} or $_->{vote} =~ /^(-1|-0|[+]1)$/),
@votesarray;
}
}
