--- loncom/interface/statistics/lonstathelpers.pm 2009/05/06 16:19:42 1.59 +++ loncom/interface/statistics/lonstathelpers.pm 2010/02/28 23:58:55 1.60 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: lonstathelpers.pm,v 1.59 2009/05/06 16:19:42 bisitz Exp $ +# $Id: lonstathelpers.pm,v 1.60 2010/02/28 23:58:55 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -464,7 +464,8 @@ sub get_prev_curr_next { my @resources = &get_resources($navmap,$seq); foreach my $res (@resources) { foreach my $part (@{$res->parts}) { - if ($res->is_survey($part) && ($granularity eq 'part_survey')){ + if (($res->is_survey($part) || ($res->is_anonsurvey($part))) && + ($granularity eq 'part_survey')) { push (@Resource, { symb => $res->symb, part => $part,