|
version 1.753, 2006/06/22 13:16:09
|
version 1.754, 2006/06/22 13:28:32
|
|
Line 4711 sub parse_access_controls {
|
Line 4711 sub parse_access_controls {
|
| } |
} |
| } elsif ($entry eq 'roles') { |
} elsif ($entry eq 'roles') { |
| $role_id = $token->[2]{id}; |
$role_id = $token->[2]{id}; |
| $content{$entry}{$role_id}} = { |
$content{$entry}{$role_id} = { |
| role => [], |
role => [], |
| access => [], |
access => [], |
| section => [], |
section => [], |
| group => [], |
group => [], |
| }; |
}; |
| } elsif ($entry eq 'users') { |
} elsif ($entry eq 'users') { |
| $content{'users'} = {}; |
$content{'users'} = {}; |
| $usercount = 0; |
$usercount = 0; |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonnet.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / lonnet / perl