--- loncom/homework/grades.pm 2005/01/29 00:09:54 1.239 +++ loncom/homework/grades.pm 2005/02/01 21:03:13 1.240 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # The LON-CAPA Grading handler # -# $Id: grades.pm,v 1.239 2005/01/29 00:09:54 albertel Exp $ +# $Id: grades.pm,v 1.240 2005/02/01 21:03:13 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -3060,14 +3060,16 @@ sub getSymbMap { my $minder = 0; # Gather every sequence that has problems. - my @sequences = $navmap->retrieveResources(undef, sub { shift->is_map(); }, 1); + my @sequences = $navmap->retrieveResources(undef, sub { shift->is_map(); }, + 1,0,1); 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()."
"); my $title = $minder.'.'.$sequence->compTitle(); push @titles, $title; # minder in case two titles are identical $symbx{$title} = $sequence->symb(); $minder++; - } +# } } return \@titles,\%symbx; }