If there are over 250 users, none are currently displayed. Added message to user in this case.

This commit is contained in:
Diona Kidd 2007-11-03 20:38:52 +00:00
parent 14e907d589
commit 7c6ba502c6

View file

@ -637,6 +637,10 @@ sub www_listUsers {
my $i18n = WebGUI::International->new($session);
my $output = getUserSearchForm($session,"listUsers");
my ($userCount) = $session->db->quickArray("select count(*) from users");
if($userCount > 250) {
$output .= "<p>There are over 250 users. Please use the search to find users.</p>\n";
}
return _submenu($session,{workarea => $output}) unless ($session->form->process("doit") || $userCount<250 || $session->form->process("pn") > 1);
tie %status, 'Tie::IxHash';
%status = (