From: Stephen L Johnson Date: Thu, 9 Mar 2000 16:59:28 +0000 (+0000) Subject: changed ack service check to use m// instead of eq X-Git-Url: http://git.etc.gen.nz/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=09803da5d9b412251aad36a66bef61dcbe709310;p=spong.git changed ack service check to use m// instead of eq --- diff --git a/src/spong-message.pl b/src/spong-message.pl index 6058261..1dd253a 100755 --- a/src/spong-message.pl +++ b/src/spong-message.pl @@ -95,7 +95,7 @@ $acks = new Spong::AckList($host); if (defined $acks) { foreach ( $acks->acks() ) { - if ( ( $_->services() eq $service or $_->services() eq "all" ) and + if ( ( $_->services() =~ m/$service/ or $_->services() eq "all" ) and ( $time >= $_->start() and $time <= $_->end() ) ) { &debug("Match on Ack for " . $_->services() . ", ending " . $_->end() . ", no message will be sent" );