From 24aad364c78d190bdb371d0f19295cbecfc04ecd Mon Sep 17 00:00:00 2001 From: Niko Tyni Date: Sun, 9 Jul 2006 08:06:42 +0000 Subject: Merge a change from the 2.0 tree. --- CHANGES | 4 ++++ lib/Smokeping.pm | 5 +++-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/CHANGES b/CHANGES index 97c8a37..4f56dd6 100644 --- a/CHANGES +++ b/CHANGES @@ -1,5 +1,9 @@ * AnotherDNS.pm: added option 'require_answers' for testing recursive DNS servers. -- niko +* brought back the FPing.pm 'timeout' parameter, since it does something + after all. -- niko, requested by Peter Klausner +* fix running an external program on edge-triggered alerts. + -- niko, from Peter Klausner 2006/7/9 -- released version 20060709_trunk diff --git a/lib/Smokeping.pm b/lib/Smokeping.pm index 0236772..557f506 100644 --- a/lib/Smokeping.pm +++ b/lib/Smokeping.pm @@ -1169,10 +1169,11 @@ sub update_rrds($$$$$) { foreach my $addr (map {$_ ? (split /\s*,\s*/,$_) : ()} $cfg->{Alerts}{to},$tree->{alertee},$cfg->{Alerts}{$_}{to}){ next unless $addr; if ( $addr =~ /^\|(.+)/) { + my $cmd = $1; if ($edgetrigger) { - system $1,$_,$line,$loss,$rtt,$tree->{host}, ($what =~/raise/); + system $cmd,$_,$line,$loss,$rtt,$tree->{host}, ($what =~/raise/); } else { - system $1,$_,$line,$loss,$rtt,$tree->{host}; + system $cmd,$_,$line,$loss,$rtt,$tree->{host}; } } elsif ( $addr =~ /^snpp:(.+)/ ) { sendsnpp $1, <