![[BACK]](/icons/back.gif){kind=icon}
Return to lonpage.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / rat|
Return to lonpage.pm CVS log | Up to [LON-CAPA] / rat |
| version 1.72, 2005/06/29 19:20:10 | version 1.73, 2006/01/11 09:13:15 |
|---|---|
| Line 180 sub handler { | Line 180 sub handler { |
| for ($i=0;$i<=$#rows;$i++) { | for ($i=0;$i<=$#rows;$i++) { |
| if ($rows[$i]) { | if ($rows[$i]) { |
| my @colcont=split(/\&/,$rows[$i]); | my @colcont=split(/\&/,$rows[$i]); |
| foreach (@colcont) { | foreach my $rid (@colcont) { |
| $symbhash{$hash{'src_'.$_}}=['page','notasymb']; | my ($mapid,$resid)=split(/\./,$rid); |
| $symbhash{$hash{'src_'.$rid}}= | |
| [$hash{'src_'.$rid},$resid]; | |
| } | } |
| } | } |
| } | } |