Diff for /loncom/interface/statistics/lonstudentassessment.pm between versions 1.152 and 1.154

version 1.152, 2009/04/04 20:06:49 version 1.154, 2009/05/17 22:55:42
Line 369  sub CreateInterface { Line 369  sub CreateInterface {
     $Str .= ' 'x5;      $Str .= ' 'x5;
     $Str .= '<input type="submit" name="ClearCache" value="'.      $Str .= '<input type="submit" name="ClearCache" value="'.
         &mt('Clear Caches').'" />';          &mt('Clear Caches').'" />';
     $Str .= '&nbsp;'x5;      $Str .= '<p>';
     $Str .=       $Str .= 
         &mt('Status [_1]',          &mt('Status [_1]',
             '<input type="text" name="stats_status" size="60" value="" readonly="readonly" />');              '<input type="text" name="stats_status" size="60" value="" readonly="readonly" />');
     $Str .= '<br />';      $Str .= '</p>';
     return $Str;      return $Str;
 }  }
   
Line 1439  sub excel_initialize { Line 1439  sub excel_initialize {
     if ($env{'form.SelectedStudent'}) {      if ($env{'form.SelectedStudent'}) {
         $studentcount = '1';          $studentcount = '1';
     }      }
     if ($studentcount > 1) {      $r->print('<p>'
         $r->print('<h1>'.&mt('Compiling Excel spreadsheet for [_1] students',               .&mt('Compiling Excel spreadsheet for [quant,_1,student]...',$studentcount)
                              $studentcount)."</h1>\n");              ."</p>\n"
     } else {      );
         $r->print('<h1>'.  
                   &mt('Compiling Excel spreadsheet for 1 student').  
                   "</h1>\n");  
     }  
     $r->rflush();      $r->rflush();
     #      #
     # Initialize progress window      # Initialize progress window
Line 1594  sub excel_finish { Line 1590  sub excel_finish {
     #      #
     # Tell the user where to get their excel file      # Tell the user where to get their excel file
     $r->print('<br />'.      $r->print('<br />'.
               '<a href="'.$filename.'">Your Excel spreadsheet.</a>'."\n");                '<a href="'.$filename.'">'.&mt('Your Excel spreadsheet').'</a>'."\n");
     $r->rflush();      $r->rflush();
     &excel_cleanup();      &excel_cleanup();
     return;      return;

Removed from v.1.152  
changed lines
  Added in v.1.154


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