--- loncom/interface/statistics/lonproblemstatistics.pm 2004/01/28 14:38:40 1.64 +++ loncom/interface/statistics/lonproblemstatistics.pm 2004/02/20 16:24:20 1.67 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: lonproblemstatistics.pm,v 1.64 2004/01/28 14:38:40 matthew Exp $ +# $Id: lonproblemstatistics.pm,v 1.67 2004/02/20 16:24:20 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -208,9 +208,8 @@ my @OutputOptions = sub CreateInterface { my $Str = ''; - $Str .= '

Overall Problem Statistics'. - &Apache::loncommon::help_open_topic('Statistics_Overall_Key'). - '

'."\n"; + $Str .= &Apache::lonhtmlcommon::breadcrumbs + (undef,'Overall Problem Statistics','Statistics_Overall_Key'); $Str .= ''."\n"; $Str .= ''; $Str .= ''; @@ -773,7 +772,8 @@ sub plot_statistics { 'Problem Number', $yaxis, $Max, - undef, + undef, # colors + undef, # labels \@Data)."

\n"); # # Print out the data @@ -788,12 +788,10 @@ sub get_statistics { my $symb = $resource->{'symb'}; my $courseid = $ENV{'request.course.id'}; # - my $students = \@Apache::lonstatistics::Students; - if ($Apache::lonstatistics::SelectedSections[0] eq 'all') { - $students = undef; - } my $data = &Apache::loncoursedata::get_problem_statistics - ($students,$symb,$part,$courseid); + (\@Apache::lonstatistics::SelectedSections, + $Apache::lonstatistics::enrollment_status, + $symb,$part,$courseid); $data->{'part'} = $part; $data->{'problem_num'} = $problem_num; $data->{'container'} = $sequence->{'title'};
'.&mt('Sections').'