|
version 1.300, 2017/05/22 07:58:46
|
version 1.301, 2017/06/05 21:12:05
|
|
Line 3261 sub print_helpsettings {
|
Line 3261 sub print_helpsettings {
|
| my $css_class; |
my $css_class; |
| my %existing=&Apache::lonnet::dump('roles',$dom,$confname,'rolesdef_'); |
my %existing=&Apache::lonnet::dump('roles',$dom,$confname,'rolesdef_'); |
| my (%customroles,%ordered,%current); |
my (%customroles,%ordered,%current); |
| if (ref($settings->{'adhoc'}) eq 'HASH') { |
if (ref($settings) eq 'HASH') { |
| %current = %{$settings->{'adhoc'}}; |
if (ref($settings->{'adhoc'}) eq 'HASH') { |
| |
%current = %{$settings->{'adhoc'}}; |
| |
} |
| } |
} |
| my $count = 0; |
my $count = 0; |
| foreach my $key (sort(keys(%existing))) { |
foreach my $key (sort(keys(%existing))) { |
![[BACK]](/icons/back.gif){kind=icon}
Return to domainprefs.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface