loncom/interface/lonstatistics.pm - diff

Return to lonstatistics.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.119, 2005/03/14 20:28:21	version 1.120, 2005/03/15 21:22:38
Line 587 sub selected_sequences_with_assessments	Line 587 sub selected_sequences_with_assessments
sub { shift->is_map(); },1,0,1);	sub { shift->is_map(); },1,0,1);
my @sequences_with_assessments;	my @sequences_with_assessments;
for my $sequence ($navmap->getById('0.0'), @sequences) {	for my $sequence ($navmap->getById('0.0'), @sequences) {
if ($navmap->hasResource($sequence,sub { shift->is_problem(); }, 0)){	if ($navmap->hasResource($sequence,sub { shift->is_problem(); },0,1)){
push(@sequences_with_assessments,$sequence);	push(@sequences_with_assessments,$sequence);
}	}
}	}