loncom/interface/lonmenu.pm - diff

Return to lonmenu.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.449, 2016/05/23 17:38:55	version 1.450, 2016/06/02 01:43:46
Line 1650 sub done_button_js {	Line 1650 sub done_button_js {
nokey => 'A proctor key is required',	nokey => 'A proctor key is required',
);	);
my $navmap = Apache::lonnavmaps::navmap->new();	my $navmap = Apache::lonnavmaps::navmap->new();
my ($missing,$tried);	my ($missing,$tried) = (0,0);
if (ref($navmap)) {	if (ref($navmap)) {
$missing=0;
$tried=0;
my @resources=();	my @resources=();
if ($type eq 'map') {	if ($type eq 'map') {
my ($mapurl,$rid,$resurl)=&Apache::lonnet::decode_symb($env{'request.symb'});	my ($mapurl,$rid,$resurl)=&Apache::lonnet::decode_symb($env{'request.symb'});
Line 1667 sub done_button_js {	Line 1665 sub done_button_js {
}	}
}	}
foreach my $res (@resources) {	foreach my $res (@resources) {
if ($res->singlepart()) {	if (ref($res->parts()) eq 'ARRAY') {
if (!$res->tries()) {
$missing++;
} else {
$tried++;
}
} else {
foreach my $part (@{$res->parts()}) {	foreach my $part (@{$res->parts()}) {
if (!$res->tries($part)) {	if (!$res->tries($part)) {
$missing++;	$missing++;