version 1.117, 2009/03/05 09:12:14
|
version 1.118, 2010/02/28 23:58:54
|
Line 1457 sub compute_statistics_on_sequence {
|
Line 1457 sub compute_statistics_on_sequence {
|
my @Data; |
my @Data; |
foreach my $res (&Apache::lonstathelpers::get_resources($navmap,$seq)) { |
foreach my $res (&Apache::lonstathelpers::get_resources($navmap,$seq)) { |
foreach my $part (@{$res->parts}) { |
foreach my $part (@{$res->parts}) { |
next if ($res->is_survey($part)); |
next if (($res->is_survey($part)) || ($res->is_anonsurvey($part))) ; |
# |
# |
# This is where all the work happens |
# This is where all the work happens |
my $data = &get_statistics($seq,$res,$part,scalar(@StatsArray)+1); |
my $data = &get_statistics($seq,$res,$part,scalar(@StatsArray)+1); |