--- loncom/interface/lonstatistics.pm 2016/08/14 16:38:05 1.156.2.7 +++ loncom/interface/lonstatistics.pm 2013/03/06 11:39:00 1.157 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: lonstatistics.pm,v 1.156.2.7 2016/08/14 16:38:05 raeburn Exp $ +# $Id: lonstatistics.pm,v 1.157 2013/03/06 11:39:00 bisitz Exp $ # # Copyright Michigan State University Board of Trustees # @@ -366,7 +366,7 @@ sub section_or_group_text { sub get_students { if (! @Students) { - &PrepareClasslist(); + &PrepareClasslist() } return @Students; } @@ -511,7 +511,7 @@ sub map_select { if ($selected_maps[0] eq 'all') { $form .= ' selected="selected"'; } - $form .= '>'.&mt('all').''."\n"; + $form .= ">all\n"; # # Loop through the sequences my @sequences = &selected_sequences_with_assessments('all'); @@ -547,11 +547,6 @@ sub SectionSelect { &PrepareClasslist() } # - # Make sure course's student table is up to date - if (@Sections) { - &Apache::loncoursedata::ensure_current_sections(); - } - # # Build the form element my $Str = "\n"; $Str .= ''; $r->print($Str); @@ -709,8 +696,8 @@ sub DisplayClasslist { .&Apache::loncommon::start_data_table_header_row(); foreach my $field (@Fields) { $Str .= ''.&mt($field). ''; } @@ -725,8 +712,8 @@ sub DisplayClasslist { if ($field eq 'fullname' || $field eq 'username') { $Str .= ''; $Str .= $student->{$field}; $Str .= ''; @@ -856,8 +843,9 @@ ENDSTYLE bug=>'Statistics and Charts'}); if (! exists($env{'form.reportSelected'}) || $env{'form.reportSelected'} eq '') { - $r->print(&Apache::lonhtmlcommon::breadcrumbs('Statistics Main Page'). - &CreateMainMenu()); + $r->print(&Apache::lonhtmlcommon::breadcrumbs('Statistics Main Page')); + &Apache::lonquickgrades::startGradeScreen($r,'statistics'); + $r->print(&CreateMainMenu()); } else { # if (! &Apache::lonmysql::verify_sql_connection()) { @@ -880,7 +868,7 @@ ENDSTYLE # # Clean out the caches if (exists($env{'form.ClearCache'})) { - &Apache::loncoursedata::delete_caches($env{'request.course.id'}); + &Apache::loncoursedata::delete_caches($env{'requres.course.id'}); } # my $GoToPage = $env{'form.reportSelected'}; @@ -944,6 +932,7 @@ ENDSTYLE # $r->print("\n"); } + &Apache::lonquickgrades::endGradeScreen($r); $r->print(&Apache::loncommon::end_page()); $r->rflush(); #