--- loncom/homework/grades.pm	2018/04/29 15:29:05	1.596.2.12.2.41.2.2
+++ loncom/homework/grades.pm	2018/10/08 19:12:29	1.596.2.12.2.44
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Grading handler
 #
-# $Id: grades.pm,v 1.596.2.12.2.41.2.2 2018/04/29 15:29:05 raeburn Exp $
+# $Id: grades.pm,v 1.596.2.12.2.44 2018/10/08 19:12:29 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;
 
@@ -472,6 +473,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 '<br /><br /><blockquote><tt>'.&keywords_highlight($answer).'</tt></blockquote>';
     } elsif ( $response eq 'organic') {
         my $result=&mt('Smile representation: [_1]',
@@ -4214,7 +4216,7 @@ sub editgrades {
 	my ($uname,$udom)=split(/:/,$user);
 	my %newrecord;
 	my $updateflag = 0;
-	my $usec=$classlist->{"$uname:$udom"}[5];
+        my $usec=$classlist->{"$uname:$udom"}[5];
         my $canmodify = &canmodify($usec);
         my $line = '<td'.($canmodify?'':' colspan="2"').'>'.
                    &nameUserString(undef,$$fullname{$user},$uname,$udom).'</td>';
@@ -4607,8 +4609,8 @@ sub csvuploadmap {
 	$datatoken=&Apache::loncommon::upfile_store($request);
     } else {
         $datatoken=&Apache::loncommon::valid_datatoken($env{'form.datatoken'});
-        if ($datatoken ne '') {
-            &Apache::loncommon::load_tmp_file($request,$datatoken);
+        if ($datatoken ne '') { 
+	    &Apache::loncommon::load_tmp_file($request,$datatoken);
         }
     }
     my @records=&Apache::loncommon::upfile_record_sep();