--- loncom/interface/statistics/lonstudentassessment.pm 2013/05/11 21:39:31 1.169.2.4 +++ loncom/interface/statistics/lonstudentassessment.pm 2023/07/10 02:33:06 1.169.2.7.2.1 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: lonstudentassessment.pm,v 1.169.2.4 2013/05/11 21:39:31 raeburn Exp $ +# $Id: lonstudentassessment.pm,v 1.169.2.7.2.1 2023/07/10 02:33:06 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -427,7 +427,7 @@ my @OutputOptions = sub OutputDescriptions { my $Str = ''; - $Str .= "
"; @@ -935,6 +938,7 @@ sub html_outputstudent { $score = sprintf("%.2f",$score); $score = (' 'x(6-length($score))).$score; } + $max = sprintf("%.2f",$max); $Str .= ' '.' 'x($total_sum_width-length($score)).$score.' / '.$max; $Str .= " \n"; # @@ -1100,9 +1104,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()); @@ -1118,8 +1122,8 @@ sub excel_initialize { my $too_many_cols_error_message = ''.&mt('Unable to Complete Request').'
'.$/. ''.&mt('LON-CAPA is unable to produce your Excel spreadsheet because your selections will result in more than 255 columns. Excel allows only 255 columns in a spreadsheet.').'
'.$/. - ''.&mt('You may consider reducing the number of Sequences or Folders you have selected.').'
'.$/. - ''.&mt('LON-CAPA can produce CSV files of this data or Excel files of the Scores Summary data.').'
'.$/; + ''.&mt('You may consider reducing the number of [_1]Sequences or Folders[_2] you have selected.','','').'
'.$/. + ''.&mt('LON-CAPA can produce [_1]CSV[_2] files of this data or Excel files of the [_1]Scores Summary[_2] data.','','').'
'.$/; if ($chosen_output->{'base'} eq 'tries' && $total_columns > 255) { $r->print($too_many_cols_error_message); $request_aborted = 1; @@ -1643,9 +1647,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 +2145,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]}; } }