adminsys/vivivi
adminsys/vivivi
9
0
Fork 0
Code Issues Pull Requests Releases Activity

do refresh on list and recheck

Browse Source
This commit is contained in:
root 2017-06-16 10:13:43 +02:00
parent cd2fc5b6b6
commit 6de25174c8
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
galanga/nagios-irc-bot.pl
View File

@ -251,6 +251,8 @@ sub on_public {
&adjust_nick ( $conn );
}
} elsif ($arg =~ /^(?:$mynick[,: ]|!)\s*list\s*$/) {
&refresh ();
$conn->privmsg([ @to ], sprintf ( "%d problemes enregistres", ( scalar @ACKS )) );
my $id = 0;
foreach ( @ACKS )
{
@ -271,6 +273,8 @@ sub on_public {
printf "[%lu] SCHEDULE_FORCED_SVC_CHECK;%s;%s;%lu\n",time(),$host,$svc,time();
close CMDPIPE;
$conn->privmsg([ @to ], sprintf ( "Recheck forcé pour %s: %s", $host, $svc ) );
&refresh ();
$conn->privmsg([ @to ], sprintf ( "%d problemes enregistres", ( scalar @ACKS )) );
}
else
{
@ -287,6 +291,8 @@ sub on_public {
printf "[%lu] SCHEDULE_FORCED_SVC_CHECK;%s;%s;%lu\n",time(),$host,$svc,time();
close CMDPIPE;
$conn->privmsg([ @to ], sprintf ( "Recheck forcé pour ack : %s du host %s: %s", $i, $host, $svc ) );
&refresh ();
$conn->privmsg([ @to ], sprintf ( "%d problemes enregistres", ( scalar @ACKS )) );
}
} else {
$self->privmsg([ @to ], "Yo!");