diff --git a/docs/upgrades/upgrade_4.7.0-4.8.0.sql b/docs/upgrades/upgrade_4.7.0-4.8.0.sql index af0c07007..addcf827a 100644 --- a/docs/upgrades/upgrade_4.7.0-4.8.0.sql +++ b/docs/upgrades/upgrade_4.7.0-4.8.0.sql @@ -1,5 +1,6 @@ insert into webguiVersion values ('4.8.0','upgrade',unix_timestamp()); update incrementer set nextValue=100000 where incrementerId='messageId'; +insert into international (internationalId,languageId,namespace,message,lastUpdated) values (748,1,'WebGUI','User Count', 1036553016); diff --git a/lib/WebGUI/Operation/Group.pm b/lib/WebGUI/Operation/Group.pm index 6d7b4ecad..e319afd78 100644 --- a/lib/WebGUI/Operation/Group.pm +++ b/lib/WebGUI/Operation/Group.pm @@ -136,12 +136,11 @@ sub www_editGroupSave { #------------------------------------------------------------------- sub www_listGroups { - my ($output, $p, $sth, @data, @row, $i); + my ($output, $p, $sth, @data, @row, $i, $userCount); if (WebGUI::Privilege::isInGroup(3)) { $output = helpIcon(10); $output .= '

'.WebGUI::International::get(89).'

'; $output .= '
'.WebGUI::International::get(90).'
'; - $output .= ''; $sth = WebGUI::SQL->read("select groupId,groupName,description from groups where groupId<>1 and groupId<>2 and groupId<>7 order by groupName"); while (@data = $sth->array) { @@ -150,12 +149,18 @@ sub www_listGroups { .editIcon('op=editGroup&gid='.$data[0]) .''; $row[$i] .= ''; - $row[$i] .= ''; + $row[$i] .= ''; + ($userCount) = WebGUI::SQL->quickArray("select count(*) from groupings where groupId=$data[0]"); + $row[$i] .= ''; + $row[$i] .= ''; $i++; } $sth->finish; $p = WebGUI::Paginator->new(WebGUI::URL::page('op=listGroups'),\@row); $output .= '
'.$data[1].''.$data[2].'
'.$data[2].''.$userCount.'
'; + $output .= ''; $output .= $p->getPage($session{form}{pn}); $output .= '
'.WebGUI::International::get(84).'' + .WebGUI::International::get(85).'' + .WebGUI::International::get(748).'
'; $output .= $p->getBarTraditional($session{form}{pn});