loncom/interface/lonchart.pm - diff

Return to lonchart.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.46, 2002/06/28 21:12:46	version 1.47, 2002/07/01 13:59:13
Line 513 sub ProcessTopResourceMap {	Line 513 sub ProcessTopResourceMap {
$hash{'title_'.$currentResourceID};	$hash{'title_'.$currentResourceID};

my $totalProblems=0;	my $totalProblems=0;
foreach (split(/\:/,$CacheData{$currentSequence.	foreach my $currentProblem (split(/\:/,
	$CacheData{$currentSequence.
':problems'})) {	':problems'})) {
foreach ($CacheData{$currentSequence.':'.$_.':parts'}) {	foreach (split(/\:/,$CacheData{$currentSequence.':'.
	$currentProblem.
	':parts'})) {
$totalProblems++;	$totalProblems++;
}	}
}	}