loncom/interface/lonmenu.pm - diff

Return to lonmenu.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.277, 2009/08/05 11:01:38	version 1.278, 2009/08/06 04:09:45
Line 1271 sub rawconfig {	Line 1271 sub rawconfig {
$output.=&clear($row,$col);	$output.=&clear($row,$col);
next;	next;
}	}
} elsif ($prt eq 'reqcrs') {	} elsif (($prt eq 'reqcrsnsc') \|\| ($prt eq 'reqcrsshc')) {
	next if (&Apache::lonnet::allowed('mky',$requested_domain));
	if (($prt eq 'reqcrsnsc') && ($show_course)) {
	next;
	}
	if (($prt eq 'reqcrsshc') && (!$show_course)) {
	next;
	}
my $showreqcrs = 0;	my $showreqcrs = 0;
foreach my $type ('official','unofficial') {	foreach my $type ('official','unofficial','community') {
if (&Apache::lonnet::usertools_access($env{'user.name'},	if (&Apache::lonnet::usertools_access($env{'user.name'},
$env{'user.domain'},	$env{'user.domain'},
$type,undef,'requestcourses')) {	$type,undef,'requestcourses')) {