loncom/interface/lonmenu.pm - diff

Return to lonmenu.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.315.2.8, 2011/01/07 22:21:02	version 1.315.2.9, 2011/03/05 16:34:50
Line 453 sub innerregister {	Line 453 sub innerregister {
$newmail= 'swmenu.setstatus("you have","messages");';	$newmail= 'swmenu.setstatus("you have","messages");';
}	}

my ($breadcrumb,$separator);	my ($breadcrumb,$separator,$resurl);
if ($noremote	if ($noremote
&& ($env{'request.symb'})	&& ($env{'request.symb'})
&& ($env{'request.course.id'})) {	&& ($env{'request.course.id'})) {

my ($mapurl,$rid,$resurl) = &Apache::lonnet::decode_symb(&Apache::lonnet::symbread());	(my $mapurl, my $rid,$resurl) = &Apache::lonnet::decode_symb(&Apache::lonnet::symbread());
my $coursetitle = $env{'course.'.$env{'request.course.id'}.'.description'};	my $coursetitle = $env{'course.'.$env{'request.course.id'}.'.description'};

my $maptitle = &Apache::lonnet::gettitle($mapurl);	my $maptitle = &Apache::lonnet::gettitle($mapurl);
Line 669 sub innerregister {	Line 669 sub innerregister {
}	}
}	}
}	}
	}
	if ($env{'request.course.id'}) {
	if ($resurl eq "public/$cdom/$cnum/syllabus") {
	if ($env{'course.'.$env{'request.course.id'}.'.externalsyllabus'} =~ /\w/) {
	if (&Apache::lonnet::allowed('mdc',$env{'request.course.id'})) {
	$editbutton=&switch('','',6,1,'pcstr.png','Edit',
	'resource[_2]',
	"go('/adm/courseprefs?phase=display&actions=courseinfo')",
	'Edit this resource');
	}
	}
	}
}	}
###	###
###	###