diff --git a/Check.pm b/Check.pm
index da17871..b0f5263 100644
--- a/Check.pm
+++ b/Check.pm
@@ -36,7 +36,7 @@ sub action
 
     # Start loop
     foreach my $host ( GetUserHosts(1) ) {
-        my($incrCnt, $incrAge, $reasonHilite,
+        my($bpc,$incrCnt, $incrAge, $reasonHilite,
            $lastAge, $lastAgeColor, $tempState, $tempReason, $lastXferErrors, $lastXferErrorsColor);
         my($shortErr);
         my @Backups = $bpc->BackupInfoRead($host);