--- loncom/interface/lonstatistics.pm 2004/06/24 19:32:37 1.106
+++ loncom/interface/lonstatistics.pm 2004/09/24 19:41:17 1.111
@@ -1,6 +1,6 @@
# The LearningOnline Network with CAPA
#
-# $Id: lonstatistics.pm,v 1.106 2004/06/24 19:32:37 matthew Exp $
+# $Id: lonstatistics.pm,v 1.111 2004/09/24 19:41:17 matthew Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -229,10 +229,10 @@ sub PrepareClasslist {
}
#
# Set up %StudentData
- @StudentDataOrder = qw/fullname username domain id section status/;
+ @StudentDataOrder = qw/fullname username domain id section status comments/;
foreach my $field (@StudentDataOrder) {
- $StudentData{$field}->{'title'} = $field;
- $StudentData{$field}->{'base_width'} = length($field);
+ $StudentData{$field}->{'title'} = &mt($field);
+ $StudentData{$field}->{'base_width'} = length(&mt($field));
$StudentData{$field}->{'width'} =
$StudentData{$field}->{'base_width'};
}
@@ -941,9 +941,12 @@ sub Gather_Full_Student_Data {
##################################################
sub DisplayClasslist {
my ($r)=@_;
+ &Apache::lonhtmlcommon::add_breadcrumb
+ ({text=>'Select One Student'});
#
# Output some of the standard interface components
my $Str;
+ $Str .= &Apache::lonhtmlcommon::breadcrumbs(undef,'Select One Student');
$Str .= ''."\n";
$Str .= '';
$Str .= '| '.&mt('Sections').' | ';
@@ -1078,7 +1081,7 @@ sub CreateMainMenu {
{ internal_name => 'student_submission_reports',
name => &mt('Student Submission Reports'),
short_description =>
- &mt('Prepare Excel spreadsheets of student submissions.'),
+ &mt('Prepare reports of student submissions.'),
},
{ internal_name => 'survey_reports',
name => &mt('Survey Reports'),
@@ -1152,9 +1155,18 @@ sub handler {
'SelectedStudent']);
#
# Give the LON-CAPA page header
+ my $style = <
+ ul.sub_studentans { list-style-type: none }
+ ul.sub_correctans { list-style-type: none }
+ tr.even { background-color: \#CCCCCC }
+ td.essay { border: 1px solid gray; }
+
+ENDSTYLE
$r->print(''.
&mt('Course Statistics and Charts').
- "\n".
+ ''.$style.
+ "\n".
&Apache::loncommon::bodytag('Course Statistics and Charts'));
$r->rflush();
#