diff --git a/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/expireaccounts.pm b/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/expireaccounts.pm
index 137f0cc..2e2a164 100644
--- a/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/expireaccounts.pm
+++ b/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/expireaccounts.pm
@@ -68,9 +68,13 @@ sub print_user_table {
return "";
}
+ my $scriptname = basename($0);
+ my $now = DateTime->now;
+
+ print "
";
+ print $q->start_table ({-CLASS => "sme-border"});
+
if (_count_active_users() > 0){
- print " |
";
- print $q->start_table ({-CLASS => "sme-border"});
print $q->Tr(
esmith::cgi::genSmallCell($q, $self->localise('ACTIVE_ACCOUNT'), "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")
);
- my $scriptname = basename($0);
-
- my $now = DateTime->now;
foreach my $u (@users) {
my $username = $u->key();
next unless (($u->prop('PasswordSet') || 'no') eq 'yes');
|