version 1.497, 2019/08/06 14:44:36
|
version 1.500, 2020/01/18 04:37:10
|
Line 449 sub secondary_menu {
|
Line 449 sub secondary_menu {
|
} |
} |
} |
} |
if ($env{'request.course.groups'} ne '') { |
if ($env{'request.course.groups'} ne '') { |
foreach my $group (split(/:/,$env{'request.course.groups'}) { |
foreach my $group (split(/:/,$env{'request.course.groups'})) { |
|
next unless ($group =~ /^\w+$/); |
my @privs = split(/:/,$env{"user.priv.$env{'request.role'}./$cdom/$cnum/$group"}); |
my @privs = split(/:/,$env{"user.priv.$env{'request.role'}./$cdom/$cnum/$group"}); |
shift(@privs); |
shift(@privs); |
if (@privs) { |
if (@privs) { |
Line 1909 sub done_button_js {
|
Line 1910 sub done_button_js {
|
my @resources=(); |
my @resources=(); |
if ($type eq 'map') { |
if ($type eq 'map') { |
my ($mapurl,$rid,$resurl)=&Apache::lonnet::decode_symb($env{'request.symb'}); |
my ($mapurl,$rid,$resurl)=&Apache::lonnet::decode_symb($env{'request.symb'}); |
@resources=$navmap->retrieveResources($mapurl,sub { $_[0]->is_problem() }); |
if ($env{'request.symb'} =~ /\.page$/) { |
|
@resources=$navmap->retrieveResources($resurl,sub { $_[0]->is_problem() }); |
|
} else { |
|
@resources=$navmap->retrieveResources($mapurl,sub { $_[0]->is_problem() }); |
|
} |
} else { |
} else { |
my $res = $navmap->getBySymb($env{'request.symb'}); |
my $res = $navmap->getBySymb($env{'request.symb'}); |
if (ref($res)) { |
if (ref($res)) { |