K

sub mailcount_sbitem {
  my ($sbitem, $get_size_only) = @_;
  $sbitem->{min_size} = $sbitem->{max_size} = 0 if ($get_size_only);
  #my $sbitem_format = settings_get_str('mailcount_sbitem');

  my $out="";
  foreach my $mbox (keys %cache){
	  $mbox =~ m/.*\/([^\/].*)$/;
	  my $name=$1;
	  my $n = $cache{$mbox}->{n};
	  my $o = $cache{$mbox}->{o};
	  $out .= "$name: $n; " if $n>0;
  }
  $sbitem->default_handler($get_size_only, undef, $out, 1);
}