From 97f6301074aeeb4020674eac4560df84be5fcf72 Mon Sep 17 00:00:00 2001
From: Andrew Dunstan <andrew@dunslane.net>
Date: Sun, 19 Dec 2010 08:54:59 -0500
Subject: [PATCH] housekeeping

---
 bf-alerts.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/bf-alerts.pl b/bf-alerts.pl
index 2481371..091b558 100755
--- a/bf-alerts.pl
+++ b/bf-alerts.pl
@@ -244,9 +244,9 @@ foreach my $clearme (@need_cleared)
     print "alert cleared $animal $branch\n";
 }
 
-foreach my $clearme (@need_alerts)
+foreach my $needme (@need_alerts)
 {
-    my ($sysbranch, $setting) = @$clearme;
+    my ($sysbranch, $setting) = @$needme;
     my ($animal, $branch) = ($sysbranch->{sysname},$sysbranch->{branch});
     my $hours = sprintf("%.2f",($now - $sysbranch->{snapshot}) / 3600);
     my $text = "$sysbranch->{sysname} has not reported " .
-- 
2.30.2