<& /Admin/Elements/Header, Title => 'Modify System ACLS' &> <& /Admin/Elements/SystemTabs &> <& /Elements/ListActions, actions => \@results &>

Modify global rights for groups

% while (my $GroupObj = $PseudoGroups->Next()) { % } % while (my $GroupObj = $Groups->Next()) { % }
Pseudogroups
<% $GroupObj->Name %> <& /Admin/Elements/SelectRights, PrincipalObj => $GroupObj, PrincipalType => 'Group', Scope => 'System' &>
Groups
<% $GroupObj->Name %> <& /Admin/Elements/SelectRights, PrincipalObj => $GroupObj, PrincipalType => 'Group', Scope => 'System' &>
<& /Elements/Submit, Caption => "Be sure to save your changes", Reset => 1 &>
<%INIT> #Update the acls. my @results = ProcessACLChanges(\@CheckACL, \%ARGS); # {{{ do basic initialization. # Find out which groups we want to display ACL selects for. my $Groups = new RT::Groups($session{'CurrentUser'}); #TODO: limit this to non-pseudogroups $Groups->LimitToReal(); my $PseudoGroups = new RT::Groups($session{'CurrentUser'}); #TODO: limit this to non-pseudogroups $PseudoGroups->LimitToPseudo; # }}} <%ARGS> @CheckACL => undef