oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fixed getLineageLength again... dont hate me whomever

Browse source
This commit is contained in:
Doug Bell 2008-08-25 20:00:23 +00:00
parent c8c8747efa
commit 78390ff400
1 changed files with 6 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

13
lib/WebGUI/Asset/Wobject/Navigation.pm
View file

@ -401,17 +401,16 @@ sub view {
my $currentLineage = $current->get("lineage"); my $currentLineage = $current->get("lineage");
my $lineageToSkip = "noskip"; my $lineageToSkip = "noskip";
my $absoluteDepthOfLastPage; my $absoluteDepthOfLastPage;
my $absoluteDepthOfFirstPage; # Will set on first iteration of loop, below
# Get the lineage 'depth' of the first asset if there are any assets at all
my $absoluteDepthOfFirstPage = exists $assets->[0]
? $assets->[0]->getLineageLength
: 0
;
my %lastChildren; my %lastChildren;
my $previousPageData = undef; my $previousPageData = undef;
my $eh = $self->session->errorHandler; my $eh = $self->session->errorHandler;
foreach my $asset (@{$assets}) { foreach my $asset (@{$assets}) {
# Set absoluteDepthOfFirstPage
if ( !defined $absoluteDepthOfFirstPage ) {
$absoluteDepthOfFirstPage = $asset->getLineageLength;
}
# skip pages we shouldn't see # skip pages we shouldn't see
my $pageLineage = $asset->get("lineage"); my $pageLineage = $asset->get("lineage");
next if ($pageLineage =~ m/^$lineageToSkip/); next if ($pageLineage =~ m/^$lineageToSkip/);