--- loncom/interface/statistics/longradinganalysis.pm 2006/06/01 19:21:22 1.6
+++ loncom/interface/statistics/longradinganalysis.pm 2013/07/22 18:06:58 1.12
@@ -1,6 +1,6 @@
# The LearningOnline Network with CAPA
#
-# $Id: longradinganalysis.pm,v 1.6 2006/06/01 19:21:22 albertel Exp $
+# $Id: longradinganalysis.pm,v 1.12 2013/07/22 18:06:58 bisitz Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -149,10 +149,7 @@ sub build_grading_analysis_page {
sub task_analysis {
my ($r,$problem,$students) = @_;
- my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin
- ($r,'Student Answer Compilation Status',
- 'Student Answer Compilation Progress', scalar(@$students),
- 'inline',undef,'Statistics','stats_status');
+ my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin($r,scalar(@$students));
my %graders;
foreach my $student (@$students) {
my $sname = $student->{'username'};
@@ -176,7 +173,7 @@ sub task_analysis {
}
&Apache::lonhtmlcommon::Increment_PrgWin($r,\%prog_state,
- &mt('last student'));
+ 'last student');
}
@@ -197,7 +194,7 @@ sub task_analysis {
}
close($outputfile);
$r->print('
'.
- ''.&mt('Your csv file.')."\n");
+ ''.&mt('Your CSV file.')."\n");
} elsif ($env{'form.output'} eq 'excel') {
my ($excel_workbook,$excel_sheet,$filename,$format,$rows_output) =
&init_excel_output($r);
@@ -218,7 +215,7 @@ sub task_analysis {
} else {
$r->print(&Apache::loncommon::start_data_table());
$r->print(&Apache::loncommon::start_data_table_header_row().
- '