From 513b65f432ab85af35453229ca741064ec99deb4 Mon Sep 17 00:00:00 2001
From: Heuzef <contact@heuzef.com>
Date: Fri, 11 Oct 2019 14:01:16 +0200
Subject: [PATCH] Declare $frequency in loop

---
 Check.pm | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/Check.pm b/Check.pm
index 8af02c1..4a3d124 100644
--- a/Check.pm
+++ b/Check.pm
@@ -26,15 +26,14 @@ use Statistics::Descriptive;
 sub action
 {
     # Init
-    my($str, $strNone, $strGood, $frequency, $header);
+    my($str, $strNone, $strGood, $header);
 
     GetStatusInfo("hosts info");
     my $Privileged = CheckPermission();
 
     # Start loop
     foreach my $host ( GetUserHosts(1) ) {
-        my($incrCnt, $incrAge, $reasonHilite,
-           $lastAge, $lastAgeColor, $tempState, $tempReason, $lastXferErrors, $lastXferErrorsColor);
+        my($incrCnt, $incrAge, $reasonHilite, $frequency, $lastAge, $lastAgeColor, $tempState, $tempReason, $lastXferErrors, $lastXferErrorsColor);
         my($shortErr);
         my $bpc = BackupPC::Lib->new();
         my @Backups = $bpc->BackupInfoRead($host);