--- loncom/interface/statistics/lonstathelpers.pm 2004/06/15 14:26:10 1.14 +++ loncom/interface/statistics/lonstathelpers.pm 2004/06/15 14:43:45 1.15 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: lonstathelpers.pm,v 1.14 2004/06/15 14:26:10 matthew Exp $ +# $Id: lonstathelpers.pm,v 1.15 2004/06/15 14:43:45 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -262,12 +262,14 @@ sub get_prev_curr_next { next if ($res->{'type'} ne 'assessment'); foreach my $part (@{$res->{'parts'}}) { my $partdata = $res->{'partdata'}->{$part}; - if ($granularity eq 'part_survey' && $partdata->{'Survey'}){ - push (@Resource, - { symb => $res->{symb}, - part => $part, - resource => $res, - } ); + if ($partdata->{'Survey'}) { + if ($granularity eq 'part_survey'){ + push (@Resource, + { symb => $res->{symb}, + part => $part, + resource => $res, + } ); + } } elsif ($granularity eq 'part') { push (@Resource, { symb => $res->{symb},