[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=();