loncom/homework/grades.pm - diff

Return to grades.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.93, 2003/05/30 21:42:36	version 1.95, 2003/06/12 20:11:07
Line 2590 sub getSymbMap {	Line 2590 sub getSymbMap {
$mapiterator->next(); # skip the first BEGIN_MAP	$mapiterator->next(); # skip the first BEGIN_MAP
my $mapcurRes = $mapiterator->next(); # for "current resource"	my $mapcurRes = $mapiterator->next(); # for "current resource"
my $ctr=0;	my $ctr=0;
while ($mapdepth > 0 && $ctr < 100) {	while ($mapdepth > 0) {
if($mapcurRes == $mapiterator->BEGIN_MAP) { $mapdepth++; }	if($mapcurRes == $mapiterator->BEGIN_MAP) { $mapdepth++; }
if($mapcurRes == $mapiterator->END_MAP) { $mapdepth++; }	if($mapcurRes == $mapiterator->END_MAP) { $mapdepth++; }

if (ref($mapcurRes) && $mapcurRes->is_problem() && !$mapcurRes->randomout) {	if (ref($mapcurRes) && $mapcurRes->is_problem() && !$mapcurRes->randomout) {
$countProblems++;	$countProblems++;
}	}
$ctr++;	$mapcurRes = $mapiterator->next();
}	}
if ($countProblems > 0) {	if ($countProblems > 0) {
my $title = $curRes->compTitle();	my $title = $curRes->compTitle();