--- loncom/interface/statistics/lonstudentassessment.pm 2005/02/25 02:37:49 1.112 +++ loncom/interface/statistics/lonstudentassessment.pm 2005/02/25 19:48:01 1.114 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: lonstudentassessment.pm,v 1.112 2005/02/25 02:37:49 matthew Exp $ +# $Id: lonstudentassessment.pm,v 1.114 2005/02/25 19:48:01 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -643,7 +643,7 @@ sub html_initialize { # Compute the column widths and output the sequence titles my $total_count; ($navmap,@sequences) = - &Apache::lonstatistics::sequences_with_assessments(); + &Apache::lonstatistics::selected_sequences_with_assessments(); if (! ref($navmap)) { # Unable to get data, so bail out $r->print("

". @@ -686,7 +686,7 @@ sub html_initialize { 0,0,0); $starttime = Time::HiRes::time; foreach my $res (@resources) { - my @parts = $res->parts; + my @parts = @{$res->parts}; $width{$symb}->{'width_parts'} += scalar(@parts); } &Apache::lonnet::logthis('2elapsed:'.(Time::HiRes::time-$starttime)); $width{$symb}->{'width_problem'} +=