search

benningm / Mail-SpamAssassin-Plugin-RedisAWL

redis support for spamassassin AWL/TxRep
1 stars 1 forks source link

Typo in RedisAddrList.pm #2

Closed hildeb closed 6 years ago

hildeb commented 6 years ago 
[root@mail-cbf] /usr/local/share/perl/5.22.1/Mail/SpamAssassin# diff -Bub RedisAddrList.pm.old RedisAddrList.pm
--- RedisAddrList.pm.old    2017-11-23 11:40:04.596673632 +0100
+++ RedisAddrList.pm    2017-11-23 13:13:35.653824497 +0100
@@ -133,14 +133,27 @@
      $self->{'prefix'}.$addr.'_count',
      $self->{'prefix'}.$addr.'_score' );

-  if ( my $mailaddr = ($addr) =~ /^(.*)\|ip=none$/) {
+  if ( my ($mailaddr) = ($addr) =~ /^(.*)\|ip=none$/) {
     # it doesn't have an IP attached.
     # try to delete any per-IP entries for this addr as well.
     # could be slow...

With the old syntax, the remove_entry subroutine in plugin searches using:

KEYS awl_1* instead of

KEYS awl_localpart@domain*

benningm commented 6 years ago

Thank you. Just fixed it.