--- loncom/interface/lonstatistics.pm 2012/03/20 16:03:54 1.155 +++ loncom/interface/lonstatistics.pm 2014/02/26 01:19:55 1.156.2.4 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: lonstatistics.pm,v 1.155 2012/03/20 16:03:54 bisitz Exp $ +# $Id: lonstatistics.pm,v 1.156.2.4 2014/02/26 01:19:55 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -511,7 +511,7 @@ sub map_select { if ($selected_maps[0] eq 'all') { $form .= ' selected="selected"'; } - $form .= ">all</option>\n"; + $form .= '>'.&mt('all').'</option>'."\n"; # # Loop through the sequences my @sequences = &selected_sequences_with_assessments('all'); @@ -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,16 +843,15 @@ ENDSTYLE bug=>'Statistics and Charts'}); if (! exists($env{'form.reportSelected'}) || $env{'form.reportSelected'} eq '') { - $r->print(&Apache::lonhtmlcommon::breadcrumbs('Statistics Main Page')); - &Apache::lonquickgrades::startGradeScreen($r,'statistics'); - $r->print(&CreateMainMenu()); + $r->print(&Apache::lonhtmlcommon::breadcrumbs('Statistics Main Page'). + &CreateMainMenu()); } else { # if (! &Apache::lonmysql::verify_sql_connection()) { my $serveradmin = $r->dir_config('lonAdmEMail'); - $r->print('<h2 class="LC_error">'. + $r->print('<p class="LC_error">'. &mt('Unable to connect to database!'). - '</h2>'); + '</p>'); $r->print('<p>' .&mt('Please notify the server administrator [_1]', ,'<b>'.$serveradmin.'</b>') @@ -928,7 +931,6 @@ ENDSTYLE # $r->print("</form>\n"); } - &Apache::lonquickgrades::endGradeScreen($r); $r->print(&Apache::loncommon::end_page()); $r->rflush(); #