[LON-CAPA-cvs] cvs: loncom /interface loncommon.pm

matthew lon-capa-cvs@mail.lon-capa.org
Fri, 17 Oct 2003 15:13:49 -0000


matthew		Fri Oct 17 11:13:49 2003 EDT

  Modified files:              
    /loncom/interface	loncommon.pm 
  Log:
  Fixing a bug introduced by the forgetfulness of another...  Sorry - you have
  no idea how long it took me to find this!
  
  
Index: loncom/interface/loncommon.pm
diff -u loncom/interface/loncommon.pm:1.131 loncom/interface/loncommon.pm:1.132
--- loncom/interface/loncommon.pm:1.131	Thu Oct 16 16:03:31 2003
+++ loncom/interface/loncommon.pm	Fri Oct 17 11:13:49 2003
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.131 2003/10/16 20:03:31 albertel Exp $
+# $Id: loncommon.pm,v 1.132 2003/10/17 15:13:49 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -2697,7 +2697,8 @@
     my $NumSets=1;
     foreach my $array (@Values) {
         next if (! ref($array));
-        $ValuesHash{$identifier.'.data.'.$NumSets++} = join(',',@$array);
+        $ValuesHash{'cgi.'.$identifier.'.data.'.$NumSets++} = 
+            join(',',@$array);
     }
     #
     $Title  = '' if (! defined($Title));