loncom/homework/grades.pm - diff

Return to grades.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.240, 2005/02/01 21:03:13	version 1.241, 2005/02/01 21:06:48
Line 3063 sub getSymbMap {	Line 3063 sub getSymbMap {
my @sequences = $navmap->retrieveResources(undef, sub { shift->is_map(); },	my @sequences = $navmap->retrieveResources(undef, sub { shift->is_map(); },
1,0,1);	1,0,1);
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) ) {
Apache->request->print($sequence->map_pc()."<br />");
my $title = $minder.'.'.$sequence->compTitle();	my $title = $minder.'.'.$sequence->compTitle();
push @titles, $title; # minder in case two titles are identical	push @titles, $title; # minder in case two titles are identical
$symbx{$title} = $sequence->symb();	$symbx{$title} = $sequence->symb();
$minder++;	$minder++;
# }	}
}	}
return \@titles,\%symbx;	return \@titles,\%symbx;
}	}