--- loncom/interface/statistics/lonstudentassessment.pm 2009/09/22 14:28:56 1.157 +++ loncom/interface/statistics/lonstudentassessment.pm 2010/04/14 06:57:17 1.161 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: lonstudentassessment.pm,v 1.157 2009/09/22 14:28:56 bisitz Exp $ +# $Id: lonstudentassessment.pm,v 1.161 2010/04/14 06:57:17 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -554,7 +554,7 @@ my @OutputDataOptions = sub HTMLifyOutputDataDescriptions { my $Str = ''; - $Str .= "

'.&mt('Output Data').'

\n"; + $Str .= '

'.&mt('Output Data').'

'."\n"; $Str .= "
\n"; foreach my $option (@OutputDataOptions) { $Str .= '
'.$option->{'name'}.'
'; @@ -671,11 +671,12 @@ sub html_initialize { # If we're showing links, show a checkbox to open in new # windows. if ($show_links ne 'no') { - my $labeltext = &mt('Show links in new window:'); + my $labeltext = &mt('Show links in new window'); $r->print(<new_window = true; -

NEW_WINDOW_CHECKBOX } @@ -825,7 +826,12 @@ sub html_outputstudent { return if (! defined($navmap)); # if($count++ % 5 == 0 && $count > 0) { - $r->print("
");
+#       $r->print("
");
+        $r->print('
'); + &Apache::lonhtmlcommon::Increment_PrgWin( + $r,\%prog_state,'last five students'); + $r->rflush(); + $r->print('
');
     }
     # First, the @StudentData fields need to be listed
     my @to_show = &get_student_fields_to_show();
@@ -937,8 +943,8 @@ sub html_outputstudent {
     #
     $r->print($Str);
     #
-    $r->rflush();
-    &Apache::lonhtmlcommon::Increment_PrgWin($r,\%prog_state,'last student');
+#   $r->rflush();
+#   &Apache::lonhtmlcommon::Increment_PrgWin($r,\%prog_state,'last student');
     return;
 }    
 
@@ -1673,7 +1679,7 @@ END
     # Datestamp
     my $description = $env{'course.'.$env{'request.course.id'}.'.description'};
     print $outputfile '"'.&Apache::loncommon::csv_translate($description).'",'.
-        '"'.&Apache::loncommon::csv_translate(scalar(localtime(time))).'"'.
+        '"'.&Apache::loncommon::csv_translate(scalar(&Apache::lonlocal::locallocaltime(time))).'"'.
             "\n";
     print $outputfile '"'.
         &Apache::loncommon::csv_translate