[LON-CAPA-cvs] cvs: loncom(version_2_11_X) /homework grades.pm
raeburn
raeburn at source.lon-capa.org
Fri Jan 23 21:27:02 EST 2015
raeburn Sat Jan 24 02:27:02 2015 EDT
Modified files: (Branch: version_2_11_X)
/loncom/homework grades.pm
Log:
- For 2.11
- Backport 1.730
Index: loncom/homework/grades.pm
diff -u loncom/homework/grades.pm:1.596.2.12.2.31 loncom/homework/grades.pm:1.596.2.12.2.32
--- loncom/homework/grades.pm:1.596.2.12.2.31 Fri Jan 23 23:34:17 2015
+++ loncom/homework/grades.pm Sat Jan 24 02:27:01 2015
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# The LON-CAPA Grading handler
#
-# $Id: grades.pm,v 1.596.2.12.2.31 2015/01/23 23:34:17 raeburn Exp $
+# $Id: grades.pm,v 1.596.2.12.2.32 2015/01/24 02:27:01 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -465,7 +465,7 @@
$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.
}
- return '<br /><br /><blockquote><tt>'.&keywords_highlight(&HTML::Entities::encode($answer, '"<>&')).'</tt></blockquote>';
+ return '<br /><br /><blockquote><tt>'.&keywords_highlight($answer).'</tt></blockquote>';
} elsif ( $response eq 'organic') {
my $result=&mt('Smile representation: [_1]',
'"<tt>'.&HTML::Entities::encode($answer, '"<>&').'</tt>"');
More information about the LON-CAPA-cvs
mailing list