# There are one or more update processes that listen for status updates
# from client programs.
-# $Id: spong-server.pl,v 1.38 2001/01/31 14:27:07 sljohnson Exp $
+# $Id: spong-server.pl,v 1.39 2001/03/26 18:51:02 sljohnson Exp $
use lib "@@LIBDIR@@";
# If status has changed
my $firstrun = 1;
foreach my $c ('red','yellow','green','clear','purple') {
- if( -f "$SPONGDB/$host/$service.$c" ) { $firstrun = 0; }
+ if( -f "$SPONGDB/$host/services/$service.$c" ) { $firstrun = 0; }
}
if ( ! -f "$SPONGDB/$host/services/$service.$color"
and ! ($firstrun and $color eq "green" ) ) {