[LON-CAPA-cvs] cvs: loncom /interface/statistics lonproblemanalysis.pm
stredwic
lon-capa-cvs@mail.lon-capa.org
Tue, 13 Aug 2002 14:44:33 -0000
stredwic Tue Aug 13 10:44:33 2002 EDT
Modified files:
/loncom/interface/statistics lonproblemanalysis.pm
Log:
No longer need to unescape values from ssi individually.
Index: loncom/interface/statistics/lonproblemanalysis.pm
diff -u loncom/interface/statistics/lonproblemanalysis.pm:1.5 loncom/interface/statistics/lonproblemanalysis.pm:1.6
--- loncom/interface/statistics/lonproblemanalysis.pm:1.5 Mon Aug 12 20:37:18 2002
+++ loncom/interface/statistics/lonproblemanalysis.pm Tue Aug 13 10:44:33 2002
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# (Publication Handler
#
-# $Id: lonproblemanalysis.pm,v 1.5 2002/08/13 00:37:18 stredwic Exp $
+# $Id: lonproblemanalysis.pm,v 1.6 2002/08/13 14:44:33 stredwic Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -381,12 +381,7 @@
'grade_domain' => $domain,
'grade_courseid' => $courseID,
'grade_symb' => $problem));
- my ($a)=&Apache::lonnet::str2hashref($Answ);
- my %b;
- foreach (keys(%$a)) {
- $b{&Apache::lonnet::unescape($_)} = $a->{$_};
- }
- my $Answer=\%b;
+ my ($Answer)=&Apache::lonnet::str2hashref($Answ);
my $found = 0;
my @parts=();