[BACK]Return to grades.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / homework

Diff for /loncom/homework/grades.pm between versions 1.486 and 1.487

version 1.486, 2007/11/08 19:57:30 version 1.487, 2007/11/08 20:47:56
Line 733  sub verifyreceipt { Line 733  sub verifyreceipt {
     $receipt     =~ s/[^\-\d]//g;      $receipt     =~ s/[^\-\d]//g;
     my ($symb)   = &get_symb($request);      my ($symb)   = &get_symb($request);
   
     my $title.='<h3><span class="LC_info">Verifying Submission Receipt '.      my $title.=
  $receipt.'</h3></span>'."\n".   '<h3><span class="LC_info">'.
  '<h4><b>Resource: </b>'.$env{'form.probTitle'}.'</h4><br /><br />'."\n";   &mt('Verifying Submission Receipt [_1]',$receipt).
    '</span></h3>'."\n".
    '<h4>'.&mt('<b>Resource: </b>[_1]',$env{'form.probTitle'}).
    '</h4>'."\n";
   
     my ($string,$contents,$matches) = ('','',0);      my ($string,$contents,$matches) = ('','',0);
     my (undef,undef,$fullname) = &getclasslist('all','0');      my (undef,undef,$fullname) = &getclasslist('all','0');
Line 749  sub verifyreceipt { Line 752  sub verifyreceipt {
     my $header =       my $header = 
  &Apache::loncommon::start_data_table().   &Apache::loncommon::start_data_table().
  &Apache::loncommon::start_data_table_header_row().   &Apache::loncommon::start_data_table_header_row().
  '<th>&nbsp;Fullname&nbsp;</th>'."\n".   '<th>&nbsp;'.&mt('Fullname').'&nbsp;</th>'."\n".
  '<th>&nbsp;Username&nbsp;</th>'."\n".   '<th>&nbsp;'.&mt('Username').'&nbsp;</th>'."\n".
  '<th>&nbsp;Domain&nbsp;</th>';   '<th>&nbsp;'.&mt('Domain').'&nbsp;</th>';
     if ($receiptparts) {      if ($receiptparts) {
  $header.='<th>&nbsp;Problem Part&nbsp;</th>';   $header.='<th>&nbsp;'.&mt('Problem Part').'&nbsp;</th>';
     }      }
     $header.=      $header.=
  &Apache::loncommon::end_data_table_header_row();   &Apache::loncommon::end_data_table_header_row();
Line 786  sub verifyreceipt { Line 789  sub verifyreceipt {
  }   }
     }      }
     if ($matches == 0) {      if ($matches == 0) {
  $string = $title.'No match found for the above receipt.';   $string = $title.&mt('No match found for the above receipt.');
     } else {      } else {
  $string = &jscriptNform($symb).$title.   $string = &jscriptNform($symb).$title.
     'The above receipt matches the following student'.      '<p>'.
     ($matches <= 1 ? '.' : 's.')."\n".      &mt('The above receipt matches the following [numerate,_1,student].',$matches).
       '</p>'.
     $header.      $header.
     $contents.      $contents.
     &Apache::loncommon::end_data_table()."\n";      &Apache::loncommon::end_data_table()."\n";
Removed from v.1.486  
changed lines
  Added in v.1.487

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