several bug fixes

This commit is contained in:
JT Smith 2005-02-22 02:05:55 +00:00
parent 22d3df0749
commit decab22c2f
9 changed files with 352 additions and 24 deletions

View file

@ -217,7 +217,6 @@ sub view {
my $self = shift;
return WebGUI::Privilege::noAccess() unless $self->canView;
#define default view month range. Note that this could be different from
#the range a user is allowed to view - set by the events calendar limitations.
my $monthRangeLength = int($self->getValue("paginateAfter"));

View file

@ -156,7 +156,7 @@ sub view {
push(@{$vars{"position".$i."_loop"}},{
id=>$child->getId,
content=>$child->view
});
}) if $child->canView;
push(@found, $child->getId);
}
}
@ -169,7 +169,7 @@ sub view {
push(@{$vars{"position1_loop"}},{
id=>$child->getId,
content=>$child->view
});
}) if $child->canView;
}
}
$vars{showAdmin} = ($session{var}{adminOn} && $self->canEdit);

View file

@ -272,19 +272,19 @@ sub view {
my $skip = 0;
my $pageLineage = $asset->get("lineage");
foreach my $lineage (@linesToSkip) {
$skip = 1 if ($lineage =~ m/^$pageLineage/);
$skip = 1 if ($pageLineage =~ m/^$lineage/);
}
next if ($skip);
if ($asset->get("isHidden") && !$self->get("showHiddenPages")) {
push (@linesToSkip,$asset->getId);
push (@linesToSkip,$asset->get("lineage")) unless ($asset->get("lineage") eq "000001");
next;
}
if ($asset->get("isSystem") && !$self->get("showSystemPages")) {
push (@linesToSkip,$asset->getId);
push (@linesToSkip,$asset->get("lineage")) unless ($asset->get("lineage") eq "000001");
next;
}
unless ($self->get("showUnprivilegedPages") || $asset->canView) {
push (@linesToSkip,$asset->getId);
push (@linesToSkip,$asset->get("lineage")) unless ($asset->get("lineage") eq "000001");
next;
}
my $pageData = {};