[Mon-commit] mon CHANGES,1.4,1.5 mon,1.27,1.28
Brought to you by:
trockij
From: Jim T. <tr...@us...> - 2011-07-20 15:05:01
|
Update of /cvsroot/mon/mon In directory vz-cvs-4.sog:/tmp/cvs-serv7258 Modified Files: CHANGES mon Log Message: fixed problem where exit status of alerts was not being called Index: CHANGES =================================================================== RCS file: /cvsroot/mon/mon/CHANGES,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** CHANGES 18 Apr 2011 03:12:06 -0000 1.4 --- CHANGES 20 Jul 2011 15:04:59 -0000 1.5 *************** *** 1,4 **** --- 1,10 ---- $Id$ + Wed Jul 20 10:26:29 EDT 2011 trockij + ------------------------------------------- + + -fixed problem where exit status of alerts was not being called + + Sun Apr 17 23:09:43 EDT 2011 trockij ------------------------------------------- Index: mon =================================================================== RCS file: /cvsroot/mon/mon/mon,v retrieving revision 1.27 retrieving revision 1.28 diff -C2 -d -r1.27 -r1.28 *** mon 20 Jun 2011 17:26:25 -0000 1.27 --- mon 20 Jul 2011 15:04:59 -0000 1.28 *************** *** 3224,3232 **** $tmnow = time; - return if (keys %running == 0); while ((my $p = waitpid (-1, &WNOHANG)) >0) { ! next if (!exists $runningpid{$p}); my ($group, $service) = split (/\//, $runningpid{$p}); my $sref = \%{$watch{$group}->{$service}}; --- 3224,3234 ---- $tmnow = time; while ((my $p = waitpid (-1, &WNOHANG)) >0) { ! if (!exists $runningpid{$p}) ! { ! next; ! } my ($group, $service) = split (/\//, $runningpid{$p}); my $sref = \%{$watch{$group}->{$service}}; |