--- loncom/interface/lonnavmaps.pm 2002/10/24 19:10:07 1.86 +++ loncom/interface/lonnavmaps.pm 2002/10/28 13:58:58 1.87 @@ -2,7 +2,7 @@ # The LearningOnline Network with CAPA # Navigate Maps Handler # -# $Id: lonnavmaps.pm,v 1.86 2002/10/24 19:10:07 bowersj2 Exp $ +# $Id: lonnavmaps.pm,v 1.87 2002/10/28 13:58:58 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -2922,7 +2922,7 @@ sub getNext { sub getPrevious { my $self = shift; - my @alreadySeen = shift; + my $alreadySeenHash = shift; my @branches; my $from = $self->from(); foreach my $branch ( split /,/, $from) { @@ -2934,9 +2934,9 @@ sub getPrevious { # browse privs my $browsePriv = &Apache::lonnet::allowed('bre', $self->src); if (!defined($alreadySeenHash) || - !defined($alreadySeenHash->{$next->{ID}}) || + !defined($alreadySeenHash->{$prev->{ID}}) || ($browsePriv ne '2' && $browsePriv ne 'F')) { - push @branches, $next; + push @branches, $prev; } } return \@branches;