sub filter_mail {
my @msglist = @_;
my $msgcount = @msglist - 2; # don't count . and ..
- my $msgcountlen = length($msgcount);
+ my $len = length($msgcount);
my @baton;
my $msg;
my $mhfolder;
print("\r");
if (not $FOLDERS{$mhfolder}) {
- print(' ' x $msgcountlen);
+ print(' ' x $len);
print(" \r$mhfolder\n");
$FOLDERS{$mhfolder} = 1;
}