loncom/interface/statistics/lonstudentassessment.pm - diff

Return to lonstudentassessment.pm CVS log

Up to [LON-CAPA] / loncom / interface / statistics

version 1.112, 2005/02/25 02:37:49	version 1.114, 2005/02/25 19:48:01
Line 643 sub html_initialize {	Line 643 sub html_initialize {
# Compute the column widths and output the sequence titles	# Compute the column widths and output the sequence titles
my $total_count;	my $total_count;
($navmap,@sequences) =	($navmap,@sequences) =
&Apache::lonstatistics::sequences_with_assessments();	&Apache::lonstatistics::selected_sequences_with_assessments();
if (! ref($navmap)) {	if (! ref($navmap)) {
# Unable to get data, so bail out	# Unable to get data, so bail out
$r->print("<h3>".	$r->print("<h3>".
Line 686 sub html_initialize {	Line 686 sub html_initialize {
0,0,0);	0,0,0);
$starttime = Time::HiRes::time;	$starttime = Time::HiRes::time;
foreach my $res (@resources) {	foreach my $res (@resources) {
my @parts = $res->parts;	my @parts = @{$res->parts};
$width{$symb}->{'width_parts'} += scalar(@parts);	$width{$symb}->{'width_parts'} += scalar(@parts);
}	}
&Apache::lonnet::logthis('2elapsed:'.(Time::HiRes::time-$starttime)); $width{$symb}->{'width_problem'} +=	&Apache::lonnet::logthis('2elapsed:'.(Time::HiRes::time-$starttime)); $width{$symb}->{'width_problem'} +=