--- loncom/interface/lonstatistics.pm 2004/06/24 19:17:49 1.105
+++ loncom/interface/lonstatistics.pm 2004/06/24 19:32:37 1.106
@@ -1,6 +1,6 @@
# The LearningOnline Network with CAPA
#
-# $Id: lonstatistics.pm,v 1.105 2004/06/24 19:17:49 matthew Exp $
+# $Id: lonstatistics.pm,v 1.106 2004/06/24 19:32:37 matthew Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -970,36 +970,36 @@ sub DisplayClasslist {
if (! @Students) {
if ($SelectedSections[0] eq 'all') {
if (lc($ENV{'form.Status'}) eq 'any') {
- $Str .= '
There are no students in the course.
';
+ $Str .= ''.
+ &mt('There are no students in the course.').
+ '
';
} elsif (lc($ENV{'form.Status'}) eq 'active') {
- $Str .= 'There are no currently enrolled students in '.
- 'the course.
';
+ $Str .= ''.
+ &mt('There are no currently enrolled students in the course.').
+ '
';
} elsif (lc($ENV{'form.Status'}) eq 'expired') {
- $Str .= 'There are no previously enrolled '.
- 'students in the course.
';
+ $Str .= ''.
+ &mt('There are no previously enrolled students in the course.').
+ '
';
}
} else {
my $sections;
- if (@SelectedSections == 1) {
- $sections = 'section '.$SelectedSections[0];
- } elsif (@SelectedSections > 2) {
- $sections = 'sections '.join(', ',@SelectedSections);
- $sections =~ s/, ([^,])*$/, and $1/;
- } else {
- $sections = 'sections '.join(' and ',@SelectedSections);
- }
if (lc($ENV{'form.Status'}) eq 'any') {
- $Str .= 'There are no students in '.$sections.'.
';
+ $Str .= ''.
+ &mt('There are no students in the selected sections.').
+ '
';
} elsif (lc($ENV{'form.Status'}) eq 'active') {
- $Str .= 'There are no currently enrolled students '.
- 'in '.$sections.'.
';
+ $Str .= ''.
+ &mt('There are no currently enrolled students in the selected sections.').
+ '
';
} elsif (lc($ENV{'form.Status'}) eq 'expired') {
- $Str .= 'There are no previously enrolled students '.
- 'in '.$sections.'.
';
+ $Str .= ''.
+ &mt('There are no previously enrolled students in the selected sections.').
+ '
';
}
}
$Str.= ''.
- 'Return to the chart.';
+ &mt('Click here to return to the chart').'';
$r->print($Str);
$r->rflush();
return;
@@ -1013,7 +1013,7 @@ sub DisplayClasslist {
$Str .= ''.$field.
+ 'sort='.$field.'">'.&mt($field).
' | ';
}
$Str .= ''."\n";
@@ -1038,6 +1038,8 @@ sub DisplayClasslist {
$Str .= &Apache::lonnet::escape($sname).'">';
$Str .= $student->{$field}.' ';
$Str .= '';
+ } elsif ($field eq 'status') {
+ $Str .= &mt($student->{$field});
} else {
$Str .= $student->{$field};
}