[LON-CAPA-cvs] cvs: rat / lonpage.pm

[albertel]

albertel		Wed Jan 11 04:13:15 2006 EDT

  Modified files:              
    /rat	lonpage.pm 
  Log:
  - BUG#4560 can't view submissions/grades from .pages
  
  
Index: rat/lonpage.pm
diff -u rat/lonpage.pm:1.72 rat/lonpage.pm:1.73
--- rat/lonpage.pm:1.72	Wed Jun 29 15:20:10 2005
+++ rat/lonpage.pm	Wed Jan 11 04:13:15 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Page Handler
 #
-# $Id: lonpage.pm,v 1.72 2005/06/29 19:20:10 albertel Exp $
+# $Id: lonpage.pm,v 1.73 2006/01/11 09:13:15 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -180,8 +180,10 @@
                   for ($i=0;$i<=$#rows;$i++) {
 		     if ($rows[$i]) {
                         my @colcont=split(/\&/,$rows[$i]);
-                        foreach (@colcont) {
-                           $symbhash{$hash{'src_'.$_}}=['page','notasymb'];
+                        foreach my $rid (@colcont) {
+			    my ($mapid,$resid)=split(/\./,$rid);
+			    $symbhash{$hash{'src_'.$rid}}=
+				[$hash{'src_'.$rid},$resid];
 		        }
 		     }
 		  }