No need to tie the hash lookup for user statuses.
This commit is contained in:
parent
df8f793c91
commit
3e5b18b8b4
1 changed files with 1 additions and 3 deletions
|
|
@ -1064,7 +1064,6 @@ sub www_listUsers {
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
my %status;
|
|
||||||
my $i18n = WebGUI::International->new($session);
|
my $i18n = WebGUI::International->new($session);
|
||||||
my $output = getUserSearchForm($session,"listUsers");
|
my $output = getUserSearchForm($session,"listUsers");
|
||||||
my ($userCount) = $session->db->quickArray("select count(*) from users");
|
my ($userCount) = $session->db->quickArray("select count(*) from users");
|
||||||
|
|
@ -1073,8 +1072,7 @@ sub www_listUsers {
|
||||||
}
|
}
|
||||||
|
|
||||||
return _submenu($session,{workarea => $output}) unless ($session->form->process("doit") || $userCount<250 || $session->form->process("pn") > 1);
|
return _submenu($session,{workarea => $output}) unless ($session->form->process("doit") || $userCount<250 || $session->form->process("pn") > 1);
|
||||||
tie %status, 'Tie::IxHash';
|
my %status = (
|
||||||
%status = (
|
|
||||||
Active => $i18n->get(817),
|
Active => $i18n->get(817),
|
||||||
Deactivated => $i18n->get(818),
|
Deactivated => $i18n->get(818),
|
||||||
Selfdestructed => $i18n->get(819)
|
Selfdestructed => $i18n->get(819)
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue