formatting mostly

This commit is contained in:
Frank Dillon 2006-06-23 01:46:55 +00:00
parent ab84147320
commit fc47c1421b

View file

@ -368,10 +368,12 @@ sub view {
my $absoluteDepthOfLastPage;
my %lastChildren;
my $previousPageData = undef;
my $eh = $self->session->errorHandler;
foreach my $asset (@{$assets}) {
# skip pages we shouldn't see
my $pageLineage = $asset->get("lineage");
next if ($pageLineage =~ m/^$lineageToSkip/);
if ($asset->get("isHidden") && !$self->get("showHiddenPages")) {
$lineageToSkip = $pageLineage unless ($pageLineage eq "000001");
next;