From: Stephen L Johnson Date: Thu, 9 Mar 2000 16:58:56 +0000 (+0000) Subject: change ack service check to use m// instead of eq X-Git-Tag: spong-2_7-alpha5~49 X-Git-Url: http://git.etc.gen.nz/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=e53f74ae9103235b4a3fb54ae80db0dc2d4c1eca;p=spong.git change 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" );