[BACK]Return to longradinganalysis.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / interface / statistics

Diff for /loncom/interface/statistics/longradinganalysis.pm between versions 1.10 and 1.12

version 1.10, 2010/06/10 16:14:39 version 1.12, 2013/07/22 18:06:58
Line 149  sub build_grading_analysis_page { Line 149  sub build_grading_analysis_page {
   
 sub task_analysis {  sub task_analysis {
     my ($r,$problem,$students) = @_;      my ($r,$problem,$students) = @_;
     my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin      my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin($r,scalar(@$students));
         ($r,'Student Answer Compilation Status',  
          'Student Answer Compilation Progress', scalar(@$students),  
          'inline',undef,'Statistics','stats_status');  
     my %graders;      my %graders;
     foreach my $student (@$students) {      foreach my $student (@$students) {
  my $sname = $student->{'username'};   my $sname = $student->{'username'};
Line 310  sub create_interface { Line 307  sub create_interface {
     $str .= '<td align="center"><b>'.&mt('Sections').'</b></td>';      $str .= '<td align="center"><b>'.&mt('Sections').'</b></td>';
     $str .= '<td align="center"><b>'.&mt('Groups').'</b></td>';      $str .= '<td align="center"><b>'.&mt('Groups').'</b></td>';
     $str .= '<td align="center"><b>'.&mt('Access Status').'</b></td>';      $str .= '<td align="center"><b>'.&mt('Access Status').'</b></td>';
     $str .= '<td>'.&mt('<b>Output as</b> [_1]',$output_selector).'</td>';      $str .= '<td>'.&mt('[_1]Output as[_2] [_3]','<b>',$output_selector,'</b>').'</td>';
     $str .= '</tr>'."\n";      $str .= '</tr>'."\n";
     ##      ##
     ##       ## 
Line 327  sub create_interface { Line 324  sub create_interface {
     $str .= '</td>';      $str .= '</td>';
     #      #
     $str .= '<td>';      $str .= '<td>';
     ##  
     $str .= '<span class="LC_nobreak"><label>'  
            .&mt('Status: [_1]',  
                     '<input type="text" name="stats_status"'  
                    .' size="60" value="" readonly="readonly" />')  
            .'</label></span>';  
     $str .= '</td>';      $str .= '</td>';
     ##      ##
     ##      ##
Removed from v.1.10  
changed lines
  Added in v.1.12

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>