version 1.369.2.76, 2019/08/06 16:49:01
|
version 1.369.2.77, 2019/08/06 23:18:43
|
Line 424 sub secondary_menu {
|
Line 424 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+$/); |
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); |