![[BACK]](/icons/back.gif){kind=icon}
Return to lonnavmaps.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface|
Return to lonnavmaps.pm CVS log | Up to [LON-CAPA] / loncom / interface |
| version 1.292, 2004/09/18 16:55:33 | version 1.293, 2004/09/19 14:47:37 |
|---|---|
| Line 3964 sub countParts { | Line 3964 sub countParts { |
| sub countResponses { | sub countResponses { |
| my $self = shift; | my $self = shift; |
| my $count; | my $count; |
| foreach my $part ($self->parts()) { | foreach my $part (@{$self->parts()}) { |
| $count+= $self->responseIds($part); | $count+= scalar($self->responseIds($part)); |
| } | } |
| return $count; | return $count; |
| } | } |