loncom/interface/spreadsheet/studentcalc.pm - diff

Return to studentcalc.pm CVS log

Up to [LON-CAPA] / loncom / interface / spreadsheet

version 1.46, 2014/02/12 16:55:36	version 1.47, 2017/12/31 15:27:03
Line 105 sub initialize_sequence_cache {	Line 105 sub initialize_sequence_cache {
unshift(@all_sequences,$toplevelseq);	unshift(@all_sequences,$toplevelseq);
}	}
foreach my $sequence (@all_sequences) {	foreach my $sequence (@all_sequences) {
if ($navmap->hasResource($sequence,sub { shift->is_problem(); }, 0,1)){	if ($navmap->hasResource($sequence,sub { shift->is_gradable(); }, 0,1)){
push(@Sequences,$sequence);	push(@Sequences,$sequence);
&get_resources($sequence);	&get_resources($sequence);
}	}
Line 120 sub get_resources {	Line 120 sub get_resources {
}	}
return () if (! defined($navmap) \|\| ! ref($navmap));	return () if (! defined($navmap) \|\| ! ref($navmap));
my @resources = $navmap->retrieveResources($seq,	my @resources = $navmap->retrieveResources($seq,
sub { shift->is_problem(); },	sub { shift->is_gradable(); },
0,0,1);	0,0,1);
$res_memoize{$seq->symb()}=\@resources;	$res_memoize{$seq->symb()}=\@resources;
return @resources;	return @resources;