Author: vetinari
Date: Sat Jul 19 06:59:20 2008
New Revision: 934

Modified:
   contrib/vetinari/dnswl

Log:
dnswl: bugfix: just whitelist connection with a score higher than or equal to 
the "wl_conn" parameter (thanks to Steve Blinch)

Modified: contrib/vetinari/dnswl
==============================================================================
--- contrib/vetinari/dnswl      (original)
+++ contrib/vetinari/dnswl      Sat Jul 19 06:59:20 2008
@@ -202,8 +202,9 @@
     }
     
     if (defined $score) {
-        $self->qp->connection->notes("whitelisthost", $self->{_dnswl_wl_conn})
-          if $self->{_dnswl_wl_conn} > -1;
+        $self->qp->connection->notes("whitelisthost", 1)
+          if (    $self->{_dnswl_wl_conn} > -1 
+              and $score >= $self->{_dnswl_wl_conn});
 
         # undef if $self->{_dnswl_ignore} is true and not found
         $self->qp->connection->notes("dnswl", $score);

Reply via email to