<& /Admin/Elements/Header, Title => "RT/Admin/Edit the group ". $Group->Name &> <& /Admin/Elements/GroupTabs, id => $Group->id &> <& /Elements/ListActions, actions => \@results &> <& /Elements/TitleBoxStart, title => 'Editing membership for group '.$Group->Name &>
Add members Current members
<& /Admin/Elements/SelectUsers, Name => "AddMembers" &> (Check box to delete group member)
    % if ($Group->MembersObj->Count == 0 ) {
  • (No members) % } else { % while (my $member = $Group->MembersObj->Next()) {
  • <%$member->UserObj->UserId%> (<%$member->UserObj->RealName%>) % } % }
<& /Elements/TitleBoxEnd &> <& /Elements/Submit &>
<%INIT> my $Group = new RT::Group($session{'CurrentUser'}); $Group->Load($id) || Abort('Could not load group'); my $key; foreach $key (keys %ARGS) { if ($key =~ /^DeleteMember-(\d+)$/) { my $id = $1; my $retval = $Group->DeleteMember($id); push (@results, $retval); } if ($key =~ /^AddMembers$/) { my $retval = $Group->AddMember($ARGS{"$key"}); push (@results, $retval); } } <%ARGS> @results => undef $CreateGroup => undef $Name => undef $id => undef