loncom/homework/bridgetask.pm - diff

Return to bridgetask.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.171, 2006/06/13 21:34:28	version 1.172, 2006/06/14 15:47:58
Line 1922 sub start_Dimension {	Line 1922 sub start_Dimension {
&Apache::lonxml::get_param('Mandatory',$parstack,$safeeval);	&Apache::lonxml::get_param('Mandatory',$parstack,$safeeval);
push(@{$dimension{$previous_dim}{'criterias'}},$dim);	push(@{$dimension{$previous_dim}{'criterias'}},$dim);
$dimension{$dim}{'nested'}=$previous_dim;	$dimension{$dim}{'nested'}=$previous_dim;
	&Apache::lonxml::debug("adding $dim as criteria to $previous_dim");
} else {	} else {
$Apache::bridgetask::top_dimensionlist{$dim}{'manadatory'}=	$Apache::bridgetask::top_dimensionlist{$dim}{'manadatory'}=
&Apache::lonxml::get_param('Mandatory',$parstack,$safeeval);	&Apache::lonxml::get_param('Mandatory',$parstack,$safeeval);
Line 2104 sub get_criteria {	Line 2105 sub get_criteria {
}	}
$result.='</div>';	$result.='</div>';
}	}
	} else {
	foreach my $id (@{$dimension{$dim}{$instance.'.criterias'}},
	@{$dimension{$dim}{'criterias'}}) {
	my $type = $dimension{$dim}{'criteria.'.$id.'.type'};
	if ($type eq 'dimension') {
	$result.=$dimension{$id}{'result'};
	}
	}
}	}
}	}
if (exists($dimension{$dim}{'nested'})) {	if (exists($dimension{$dim}{'nested'})) {