From fbf609a87c67f642dbdf41bd4b2ed0f55874f2f5 Mon Sep 17 00:00:00 2001 From: Peter Palfrader Date: Fri, 23 Aug 2002 06:03:56 +0000 Subject: Fix a major bug introduced in 2.0beta31 that resulted in no remailer-xxx queries beeing sent out. --- Echolot/Conf.pm | 13 ++++++++++--- 1 file changed, 10 insertions(+), 3 deletions(-) (limited to 'Echolot') diff --git a/Echolot/Conf.pm b/Echolot/Conf.pm index 1b0ad9d..8af10f3 100644 --- a/Echolot/Conf.pm +++ b/Echolot/Conf.pm @@ -1,7 +1,7 @@ package Echolot::Conf; # (c) 2002 Peter Palfrader -# $Id: Conf.pm,v 1.25 2002/08/18 06:18:00 weasel Exp $ +# $Id: Conf.pm,v 1.26 2002/08/23 06:03:56 weasel Exp $ # =pod @@ -54,11 +54,18 @@ sub send_requests($;$) { next unless ($remailer->{'status'} eq 'active'); next unless ($remailer->{'fetch'}); my $address = $remailer->{'address'}; - next if ($which ne 'all' && $which ne $address ); + + next unless ( + $which eq 'all' || + $which eq $address || + $which eq ''); for my $type (qw{conf key help stats adminkey}) { - next if ($which ne $address && $this_call_id ne (Echolot::Tools::makeShortNumHash($address.$type) % $send_every_n_calls)); + next unless ( + $which eq $address || + $which eq 'all' || + ($which eq '' && $this_call_id eq (Echolot::Tools::makeShortNumHash($address.$type) % $send_every_n_calls))); print "Sending $type requests to ".$address."\n" if Echolot::Config::get()->{'verbose'}; -- cgit v1.2.3