--- loncom/homework/grades.pm 2016/10/14 17:33:34 1.596.2.12.2.37
+++ loncom/homework/grades.pm 2018/10/09 15:45:43 1.596.2.12.2.40.2.1
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# The LON-CAPA Grading handler
#
-# $Id: grades.pm,v 1.596.2.12.2.37 2016/10/14 17:33:34 raeburn Exp $
+# $Id: grades.pm,v 1.596.2.12.2.40.2.1 2018/10/09 15:45:43 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -44,6 +44,7 @@ use Apache::Constants qw(:common :http);
use Apache::lonlocal;
use Apache::lonenc;
use Apache::bridgetask();
+use Apache::lontexconvert();
use String::Similarity;
use LONCAPA;
@@ -465,6 +466,7 @@ sub cleanRecord {
$env{'form.kwstyle'} = $keyhash{$loginuser.'_kwstyle'} ne '' ? $keyhash{$loginuser.'_kwstyle'} : '';
$env{'form.'.$symb} = 1; # so that we don't have to read it from disk for multiple sub of the same prob.
}
+ $answer = &Apache::lontexconvert::msgtexconverted($answer);
return '
'.&keywords_highlight($answer).''; } elsif ( $response eq 'organic') { my $result=&mt('Smile representation: [_1]', @@ -3756,7 +3758,7 @@ sub viewgrades { #retrieve selected groups my (@groups,$group_display); - @groups = &Apache::loncommon::get_env_multiple(form.group'); + @groups = &Apache::loncommon::get_env_multiple('form.group'); if (grep(/^all$/,@groups)) { @groups = ('all'); } elsif (grep(/^none$/,@groups)) { @@ -3973,7 +3975,7 @@ sub viewgrades { $result .= &mt('There are no students in section(s) [_1] with enrollment status [_2] to modify or grade.', $section_display,$stu_status); } elsif (grep(/^none$/,@groups)) { - $result .= &mt('There are no students in section(s) [_1] nd no group with enrollment status [_2] to modify or grade.', + $result .= &mt('There are no students in section(s) [_1] and no group with enrollment status [_2] to modify or grade.', $section_display,$stu_status); } else { $result .= &mt('There are no students in section(s) [_1] and group(s) [_2] with enrollment status [_3] to modify or grade.', @@ -10008,7 +10010,8 @@ sub substatus_options { 'queued' => 'in grading queue', 'graded' => 'with ungraded submissions', 'incorrect' => 'with incorrect submissions', - 'all' => 'with any status'); + 'all' => 'with any status', + ); } sub reset_perm {