# There are one or more update processes that listen for status updates
# from client programs.
-# $Id: spong-server.pl,v 1.51 2002/07/09 17:58:55 sljohnson Exp $
+# $Id: spong-server.pl,v 1.52 2002/07/09 21:41:47 sljohnson Exp $
use lib "@@LIBDIR@@";
# If status has changed
my $firstrun = 1;
foreach my $c ('red','yellow','green','clear','purple') {
- if( -f "$SPONGDB/$host/services/$service.$c" ) { $firstrun = 0; }
+ if( -f "$SPONGDB/$host/services/$service-$c" ) { $firstrun = 0; }
}
- if ( ! -f "$SPONGDB/$host/services/$service.$color"
+ if ( ! -f "$SPONGDB/$host/services/$service-$color"
and ! ($firstrun and $color eq "green" ) ) {
# If this is the first update, don't page on a green status!!
&debug("change in state, messaging a human",2);