--- loncom/loncron	2020/05/06 14:31:59	1.123
+++ loncom/loncron	2020/05/09 19:17:33	1.124
@@ -2,7 +2,7 @@
 
 # Housekeeping program, started by cron, loncontrol and loncron.pl
 #
-# $Id: loncron,v 1.123 2020/05/06 14:31:59 raeburn Exp $
+# $Id: loncron,v 1.124 2020/05/09 19:17:33 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -542,7 +542,7 @@ sub clean_balanceIDs {
     my $cleaned=0;
     my $active=0;
     if (-d $perlvar{'lonBalanceDir'}) {
-        while (my $fname=<$perlvar{'balanceDir'}/*.id>) {
+        while (my $fname=<$perlvar{'lonBalanceDir'}/*.id>) {
             my ($dev,$ino,$mode,$nlink,
                 $uid,$gid,$rdev,$size,
                 $atime,$mtime,$ctime,