--- loncom/interface/statistics/lonsubmissiontimeanalysis.pm 2005/03/08 17:39:35 1.20 +++ loncom/interface/statistics/lonsubmissiontimeanalysis.pm 2005/03/14 20:28:22 1.22 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: lonsubmissiontimeanalysis.pm,v 1.20 2005/03/08 17:39:35 matthew Exp $ +# $Id: lonsubmissiontimeanalysis.pm,v 1.22 2005/03/14 20:28:22 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -37,7 +37,6 @@ use Apache::lonstathelpers; use Apache::lonlocal; use HTML::Entities(); use Time::Local(); -use Spreadsheet::WriteExcel(); my $plotcolors = ['#33ff00', '#ff33cc', '#990000', '#aaaa66', '#663399', '#ff9933', @@ -128,6 +127,9 @@ sub BuildSubmissionTimePage { } else { $r->print('

'.$resource->compTitle.'

'); $r->print('

'.$resource->src.'

'); + $r->print('

'. + &Apache::lonstatistics::section_and_enrollment_description(). + '

'); $r->rflush(); $r->print(&Apache::lonstathelpers::render_resource($resource)); $r->print('
'); @@ -170,7 +172,7 @@ sub analyze_times { my $html; # holds results of analysis # Get the data my $SubData = &Apache::loncoursedata::get_response_time_data - (\@Apache::lonstatistics::SelectedSections, + ([&Apache::lonstatistics::get_selected_sections()], $Apache::lonstatistics::enrollment_status, $symb,$part); if (! defined($SubData) || ! ref($SubData)) {