loncom/interface/loncommon.pm - diff

Return to loncommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.925.2.4, 2009/12/14 22:40:45	version 1.925.2.5, 2009/12/15 05:08:50
Line 4548 sub bodytag {	Line 4548 sub bodytag {

my $role_selector;	my $role_selector;
if (($custommenu) && ($env{'request.course.id'}) &&	if (($custommenu) && ($env{'request.course.id'}) &&
($env{'course.'.$env{'request.course.id'}.'.domain'} eq 'gcitest')) {	($env{'course.'.$env{'request.course.id'}.'.domain'} eq 'gcitest') &&
	($env{'request.role'} !~ m{^st\./gcitest/$match_courseid})) {
$role_selector = &Apache::lonmenu::roles_selector(	$role_selector = &Apache::lonmenu::roles_selector(
$env{'course.' . $env{'request.course.id'} . '.domain'},	$env{'course.' . $env{'request.course.id'} . '.domain'},
$env{'course.' . $env{'request.course.id'} . '.num'} );	$env{'course.' . $env{'request.course.id'} . '.num'} );
Line 4580 sub bodytag {	Line 4581 sub bodytag {

#don't show menus for public users	#don't show menus for public users
if($env{'user.name'} ne 'public' && $env{'user.domain'} ne 'public'){	if($env{'user.name'} ne 'public' && $env{'user.domain'} ne 'public'){
if ($custommenu) {	if (($custommenu) &&
	($env{'request.role'} !~ m{^st\./gcitest/$match_courseid})) {
$bodytag .= &Apache::lonmenu::gci_secondary_menu();	$bodytag .= &Apache::lonmenu::gci_secondary_menu();
} else {	} else {
$bodytag .= Apache::lonmenu::secondary_menu();	$bodytag .= Apache::lonmenu::secondary_menu();