loncom/interface/lonmainmenu.pm - diff

Return to lonmainmenu.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.10.2.2.6.1, 2021/12/31 22:11:36	version 1.13, 2021/06/07 06:05:49
Line 44 use Apache::lonlocal;	Line 44 use Apache::lonlocal;
sub handler {	sub handler {
my $r = shift;	my $r = shift;

# Check for critical messages and redirect if present.	# Check for critical messages and redirect if present.
my ($redirect,$url) = &Apache::loncommon::critical_redirect(300,'menu');	my ($redirect,$url) = &Apache::loncommon::critical_redirect(300,'menu');
if ($redirect) {	if ($redirect) {
&Apache::loncommon::content_type($r,'text/html');	&Apache::loncommon::content_type($r,'text/html');
Line 61 sub handler {	Line 61 sub handler {
# temporarily set interface to "faketextual" and remote to "off", which renders	# temporarily set interface to "faketextual" and remote to "off", which renders
# the main menu	# the main menu
$env{'browser.interface'}='faketextual';	$env{'browser.interface'}='faketextual';
$env{'environment.remote'}='off';
$r->print(&Apache::loncommon::start_page( 'Main Menu',	$r->print(&Apache::loncommon::start_page( 'Main Menu',
undef,	undef,
{'bread_crumbs' => 1}));	{'bread_crumbs' => 1}));
#	#
# If menu collection is in effect in course context, and Main Menu is	# If menu collection is in effect in course context, and Main Menu is
# not included, display message in place of usual menu items.	# not included, display message in place of usual menu items.
#	#
if ($env{'request.course.id'}) {	if ($env{'request.course.id'}) {