--- loncom/interface/lonstatistics.pm 2012/05/10 18:47:29 1.156.2.1 +++ loncom/interface/lonstatistics.pm 2013/04/11 15:49:49 1.158 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: lonstatistics.pm,v 1.156.2.1 2012/05/10 18:47:29 raeburn Exp $ +# $Id: lonstatistics.pm,v 1.158 2013/04/11 15:49:49 bisitz Exp $ # # Copyright Michigan State University Board of Trustees # @@ -615,7 +615,7 @@ sub DisplayClasslist { # Output some of the standard interface components my $Str; $Str .= &Apache::lonhtmlcommon::breadcrumbs('Select One Student'); - $Str .= '<p><table cellspacing="5">'."\n"; + $Str .= '<table cellspacing="5">'."\n"; $Str .= '<tr>'; $Str .= '<th align="center"><b>'.&mt('Sections').'</b></th>'; $Str .= '<th align="center"><b>'.&mt('Groups').'</b></th>'; @@ -633,7 +633,7 @@ sub DisplayClasslist { '</td>'; $Str .= '</tr>'.$/; - $Str .= '</table></p>'; + $Str .= '</table>'; $Str .= '<input type="submit" name="selectstudent" value="'. &mt('Update Display').'" />'; $r->print($Str); @@ -691,13 +691,13 @@ sub DisplayClasslist { } $Str .= '<h2>'.&mt('Select One Student').'</h2>' - .'<p>'.&mt("Click on a student's name or username to view their chart").'</p>' + .'<p>'.&mt("Click on a student's name or username to view their chart.").'</p>' .&Apache::loncommon::start_data_table() .&Apache::loncommon::start_data_table_header_row(); foreach my $field (@Fields) { $Str .= '<th><a href="/adm/statistics?'. - 'reportSelected=student_assessment&'. - 'selectstudent=1&'. + 'reportSelected=student_assessment&'. + 'selectstudent=1&'. 'sort='.$field.'">'.&mt($field). '</a></th>'; } @@ -712,15 +712,19 @@ sub DisplayClasslist { if ($field eq 'fullname' || $field eq 'username') { $Str .= '<a href="/adm/statistics?reportSelected='; $Str .= &escape('student_assessment'); - $Str .= '&sort='.&escape($env{'form.sort'}); - $Str .= '&SelectedStudent='; + $Str .= '&sort='.&escape($env{'form.sort'}); + $Str .= '&SelectedStudent='; $Str .= &escape($sname).'">'; - $Str .= $student->{$field}.' '; + $Str .= $student->{$field}; $Str .= '</a>'; } elsif ($field eq 'status') { $Str .= &mt($student->{$field}); } else { - $Str .= $student->{$field}; + if ($student->{$field} eq 'none') { + $Str .= &mt('none') + } else { + $Str .= $student->{$field}; + } } $Str .= '</td>'; } @@ -839,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()) { @@ -927,6 +932,7 @@ ENDSTYLE # $r->print("</form>\n"); } + &Apache::lonquickgrades::endGradeScreen($r); $r->print(&Apache::loncommon::end_page()); $r->rflush(); #