loncom/interface/lonmenu.pm - diff

Return to lonmenu.pm CVS log

Up to [LON-CAPA] / loncom / interface

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);