This commit was generated by cvs2svn to compensate for changes in r2526,
[freeside.git] / rt / webrt / Admin / Global / UserRights.html
1 <& /Admin/Elements/Header, Title => 'Modify System ACLS' &>
2 <& /Admin/Elements/SystemTabs &>
3   
4 <& /Elements/ListActions, actions => \@results &>
5   <FORM METHOD=POST action="UserRights.html">
6       
7
8 <h2>Modify global rights for users</h2>
9 <TABLE>
10 %       while (my $UserObj = $Users->Next()) {
11   <TR ALIGN=RIGHT> 
12         <TD VALIGN=TOP>
13           <A HREF="<%$RT::WebPath%>/Admin/Users/Modify.html?id=<%$UserObj->id%>"><% $UserObj->Name %></A>
14         </TD>
15         <TD>
16           <& /Admin/Elements/SelectRights, PrincipalObj => $UserObj, 
17               PrincipalType => 'User',
18               Scope => 'System' &>
19           
20         </TD>
21       </TR>
22         
23 % }
24     </TABLE>
25     
26     <& /Elements/Submit, Caption => "Be sure to save your changes", Reset => 1 &>
27   </FORM>
28   
29 <%INIT>
30  
31  my @results =  ProcessACLChanges(\@CheckACL, \%ARGS);
32
33  # Find out which users we want to display ACL selects for
34  my $Users = new RT::Users($session{'CurrentUser'});
35
36  $Users->LimitToPrivileged();
37   
38 </%INIT>
39
40 <%ARGS>
41 @CheckACL => undef
42 </%ARGS>