
<& /Admin/Elements/Header, Title => 'Admin/Groups' &>
<& /Admin/Elements/Tabs, current_tab => 'Admin/Groups/' &>

<& /Elements/TitleBoxStart, title => 'Select a group' &>

Pseudogroups:<BR>
<UL>
%while ( $Group = $PseudoGroups->Next) {
<LI><A HREF="Modify.html?id=<%$Group->id%>"><%$Group->id%>: <%$Group->Name%></a><BR>
%}

</UL>

Groups:<BR>
<UL>
<LI><A HREF="Modify.html?Create=1">Create a new group</A><BR><BR></LI>
%while ( $Group = $Groups->Next) {
<LI><A HREF="Modify.html?id=<%$Group->id%>"><%$Group->id%>: <%$Group->Name%></a><BR>
%}
</UL>

<& /Elements/TitleBoxEnd &>
<%INIT>
my ($Group);
my $PseudoGroups = new RT::Groups($session{'CurrentUser'});
$PseudoGroups->LimitToPseudo;
my $Groups = new RT::Groups($session{'CurrentUser'});
$Groups->LimitToReal;

</%INIT>
<%ARGS>
</%ARGS>
