Diff for /loncom/interface/statistics/lonstudentassessment.pm between versions 1.151 and 1.155

version 1.151, 2008/10/14 15:16:58 version 1.155, 2009/05/17 23:13:49
Line 248  sub next_and_previous_buttons { Line 248  sub next_and_previous_buttons {
     if (defined($previous)) {      if (defined($previous)) {
         my $sname = $previous->{'username'}.':'.$previous->{'domain'};          my $sname = $previous->{'username'}.':'.$previous->{'domain'};
         $previousbutton .= '<input type="button" value="'.          $previousbutton .= '<input type="button" value="'.
             'Previous Student ('.              &mt('Previous Student ([_1])',
             $previous->{'username'}.'@'.$previous->{'domain'}.')'.              $previous->{'username'}.':'.$previous->{'domain'}).
             '" onclick="document.Statistics.SelectedStudent.value='.              '" onclick="document.Statistics.SelectedStudent.value='.
             "'".$sname."'".';'.              "'".$sname."'".';'.
             'document.Statistics.submit();" />';              'document.Statistics.submit();" />';
     } else {      } else {
         $previousbutton .= '<input type="button" value="'.          $previousbutton .= '<input type="button" value="'.
             'Previous student (none)'.'" />';              &mt('Previous Student').'" disabled="disabled" />';
     }      }
     #      #
     # Build the next student link      # Build the next student link
Line 264  sub next_and_previous_buttons { Line 264  sub next_and_previous_buttons {
     if (defined($next)) {      if (defined($next)) {
         my $sname = $next->{'username'}.':'.$next->{'domain'};          my $sname = $next->{'username'}.':'.$next->{'domain'};
         $nextbutton .= '<input type="button" value="'.          $nextbutton .= '<input type="button" value="'.
             'Next Student ('.              &mt('Next Student ([_1])',
             $next->{'username'}.'@'.$next->{'domain'}.')'.              $next->{'username'}.':'.$next->{'domain'}).
             '" onclick="document.Statistics.SelectedStudent.value='.              '" onclick="document.Statistics.SelectedStudent.value='.
             "'".$sname."'".';'.              "'".$sname."'".';'.
             'document.Statistics.submit();" />';              'document.Statistics.submit();" />';
     } else {      } else {
         $nextbutton .= '<input type="button" value="'.          $nextbutton .= '<input type="button" value="'.
             'Next student (none)'.'" />';              &mt('Next Student').'" disabled="disabled" />';
     }      }
     #      #
     # Build the 'all students' button      # Build the 'all students' button
     my $all = '';      my $all = '';
     $all .= '<input type="button" value="All Students" '.      $all .= '<input type="button" value="'.&mt('All Students').'" '.
             '" onclick="document.Statistics.SelectedStudent.value='.              '" onclick="document.Statistics.SelectedStudent.value='.
             "''".';'.'document.Statistics.submit();" />';              "''".';'.'document.Statistics.submit();" />';
     $Str .= $previousbutton.('&nbsp;'x5).$all.('&nbsp;'x5).$nextbutton;      $Str .= $previousbutton.('&nbsp;'x5).$all.('&nbsp;'x5).$nextbutton;
Line 369  sub CreateInterface { Line 369  sub CreateInterface {
     $Str .= '&nbsp;'x5;      $Str .= '&nbsp;'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 675  sub html_initialize { Line 675  sub html_initialize {
         $r->print(<<NEW_WINDOW_CHECKBOX);          $r->print(<<NEW_WINDOW_CHECKBOX);
 <script type="text/javascript">new_window = true;</script>  <script type="text/javascript">new_window = true;</script>
 <p><label>$labeltext   <p><label>$labeltext 
 <input type="checkbox" checked="1" onclick="new_window=this.checked" />  <input type="checkbox" checked="checked" onclick="new_window=this.checked" />
 </label></p>  </label></p>
 NEW_WINDOW_CHECKBOX  NEW_WINDOW_CHECKBOX
     }      }
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.151  
changed lines
  Added in v.1.155


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