|
version 1.141, 2004/11/02 20:48:02
|
version 1.141.2.3, 2005/04/21 17:35:58
|
|
Line 142 sub get_sequence_assessment_data {
|
Line 142 sub get_sequence_assessment_data {
|
| # |
# |
| my $previous_too; |
my $previous_too; |
| my $previous; |
my $previous; |
| while (scalar(@Nested_Sequences)) { |
while (1) { |
| $previous_too = $previous; |
$previous_too = $previous; |
| $previous = $curRes; |
$previous = $curRes; |
| $curRes = $iterator->next(); |
$curRes = $iterator->next(); |
| |
if (!$curRes) { last; } |
| my $currentmap = $Nested_Sequences[-1]; # Last one on the stack |
my $currentmap = $Nested_Sequences[-1]; # Last one on the stack |
| if ($curRes == $iterator->BEGIN_MAP()) { |
if ($curRes == $iterator->BEGIN_MAP()) { |
| if (! ref($previous)) { |
if (! ref($previous)) { |
![[BACK]](/icons/back.gif){kind=icon}
Return to loncoursedata.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface