]> git.etc.gen.nz Git - spong.git/commitdiff
change ack service check to use m// instead of eq
authorStephen L Johnson <sjohnson@monsters.org>
Thu, 9 Mar 2000 16:58:56 +0000 (16:58 +0000)
committerStephen L Johnson <sjohnson@monsters.org>
Thu, 9 Mar 2000 16:58:56 +0000 (16:58 +0000)
src/spong-message.pl

index 605826161ac497c04bea2cfb5010eb7454977b23..1dd253a1fddd89c75b51563188b447ec1b952dc3 100755 (executable)
@@ -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" );