Fix tables when there is no active accounts

tags/smeserver-expire-accounts-0.1.7-1
Daniel Berteaud 9 years ago
parent 841c1c0fed
commit 545b9573a2
  1. 11
      root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/expireaccounts.pm

@ -68,9 +68,13 @@ sub print_user_table {
return ""; return "";
} }
my $scriptname = basename($0);
my $now = DateTime->now;
print " <tr><td colspan=\"2\">";
print $q->start_table ({-CLASS => "sme-border"});
if (_count_active_users() > 0){ if (_count_active_users() > 0){
print " <tr><td colspan=\"2\">";
print $q->start_table ({-CLASS => "sme-border"});
print $q->Tr( print $q->Tr(
esmith::cgi::genSmallCell($q, $self->localise('ACTIVE_ACCOUNT'), "header"), esmith::cgi::genSmallCell($q, $self->localise('ACTIVE_ACCOUNT'), "header"),
esmith::cgi::genSmallCell($q, $self->localise('USER_NAME'), "header"), esmith::cgi::genSmallCell($q, $self->localise('USER_NAME'), "header"),
@ -79,9 +83,6 @@ sub print_user_table {
esmith::cgi::genSmallCell($q, $self->localise('ACTION'), "header") esmith::cgi::genSmallCell($q, $self->localise('ACTION'), "header")
); );
my $scriptname = basename($0);
my $now = DateTime->now;
foreach my $u (@users) { foreach my $u (@users) {
my $username = $u->key(); my $username = $u->key();
next unless (($u->prop('PasswordSet') || 'no') eq 'yes'); next unless (($u->prop('PasswordSet') || 'no') eq 'yes');

Loading…
Cancel
Save