fix url in alert emails for alerts triggered by slaves

2 files changed, 5 insertions, 3 deletions

diff --git a/CHANGES b/CHANGES
index eea9142..cea0cd9 100644
--- a/CHANGES
+++ b/CHANGES
@@ -1,3 +1,6 @@
+* fixed url in alert  messages triggered from slaves. as reported by Nathan
+  Long --tobi
+
 * fix a typo in configuration example 4, spotted by Guglielmo Bondioni
   <guglielmo.bondioni *gmail.com> --niko
 
diff --git a/lib/Smokeping.pm b/lib/Smokeping.pm
index e09419a..990de60 100644
--- a/lib/Smokeping.pm
+++ b/lib/Smokeping.pm
@@ -1807,10 +1807,9 @@ sub check_alerts {
                 $line =~ s|^$base/||;
                 $line =~ s|/host$||;
                 $line =~ s|/|.|g;
+                my $urlline = $cfg->{General}{cgiurl}."?target=".$line;
                 $line .= "[from $slave]" if $slave;
-                    do_log("Alert $_ $what for $line");
-                my $urlline = $line;
-                $urlline =  $cfg->{General}{cgiurl}."?target=".$line;
+                do_log("Alert $_ $what for $line");
                 my $loss = "loss: ".join ", ",map {defined $_ ? (/^\d/ ? sprintf "%.0f%%", $_ :$_):"U" } @{$x->{loss}};
                 my $rtt = "rtt: ".join ", ",map {defined $_ ? (/^\d/ ? sprintf "%.0fms", $_*1000 :$_):"U" } @{$x->{rtt}}; 
                         my $time = time;