--- loncom/interface/statistics/lonstudentassessment.pm 2013/08/08 16:53:53 1.169.2.5 +++ loncom/interface/statistics/lonstudentassessment.pm 2019/03/20 03:43:47 1.169.2.7 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: lonstudentassessment.pm,v 1.169.2.5 2013/08/08 16:53:53 raeburn Exp $ +# $Id: lonstudentassessment.pm,v 1.169.2.7 2019/03/20 03:43:47 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -427,7 +427,7 @@ my @OutputOptions = sub OutputDescriptions { my $Str = ''; - $Str .= "

Output Formats

\n"; + $Str .= '

'.&mt('Output Formats')."

\n"; $Str .= "
\n"; foreach my $outputmode (@OutputOptions) { $Str .="
".$outputmode->{'name'}."
\n"; @@ -1100,9 +1100,9 @@ sub excel_initialize { &Apache::lonstatistics::selected_sequences_with_assessments(); if (! ref($navmap)) { # Unable to get data, so bail out - $r->print("

". + $r->print('

'. &mt('Unable to retrieve course information.'). - '

'); + '

'); } # my $total_columns = scalar(&get_student_fields_to_show()); @@ -1643,9 +1643,9 @@ sub csv_initialize{ &Apache::lonstatistics::selected_sequences_with_assessments(); if (! ref($navmap)) { # Unable to get data, so bail out - $r->print("

". + $r->print('

'. &mt('Unable to retrieve course information.'). - '

'); + '

'); } # # Deal with unimplemented requests @@ -2141,7 +2141,7 @@ sub student_performance_on_sequence { } if ($randompick) { my @uniquetotals = keys(%ptsfreq); - if ((@uniquetotals = 1) && ($ptsfreq{$uniquetotals[0]} > 0)) { + if ((@uniquetotals == 1) && ($ptsfreq{$uniquetotals[0]} > 0)) { $max = $max * $randompick/$ptsfreq{$uniquetotals[0]}; } }