--- loncom/interface/statistics/lonstudentsubmissions.pm 2012/05/12 03:52:02 1.68.2.1 +++ loncom/interface/statistics/lonstudentsubmissions.pm 2012/12/10 23:18:47 1.68.2.2 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: lonstudentsubmissions.pm,v 1.68.2.1 2012/05/12 03:52:02 raeburn Exp $ +# $Id: lonstudentsubmissions.pm,v 1.68.2.2 2012/12/10 23:18:47 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -730,7 +730,14 @@ sub html_non_essay_results { } } } else { - @values = map { $response->{$_}; } @$headers; + foreach my $original_header (@$headers) { + if ($original_header eq 'Time') { + push(@values,&Apache::lonlocal::locallocaltime($response->{$original_header})); + } else { + # A normal column + push(@values,$response->{$original_header}); + } + } } my $td = ''; my $str = $td.join(''.$td,@values).''; @@ -1236,7 +1243,7 @@ sub prepare_csv_output { sub csv_format_item { my ($item,$type) = @_; if ($type eq 'Time') { - $item = localtime($item); + $item = &Apache::lonlocal::locallocaltime($item); } $item =&Apache::loncommon::csv_translate($item); return $item;