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

*** empty log message ***

Browse source
This commit is contained in:
Matthew Wilson 2005-08-25 14:06:37 +00:00
parent e976bfae67
commit b8fc95d5bd
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -317,12 +317,12 @@ sub view {
} elsif ($self->get("startType") eq "relativeToCurrentUrl") { } elsif ($self->get("startType") eq "relativeToCurrentUrl") {
if ($self->get("startPoint") < 0) { if ($self->get("startPoint") < 0) {
$start = WebGUI::Asset->newByLineage(substr($current->get("lineage"),0, $start = WebGUI::Asset->newByLineage(substr($current->get("lineage"),0,
($current->getLineageLength - $self->get("startPoint") + 1) * 6 ($current->getLineageLength + $self->get("startPoint") + 1) * 6
)); ));
} elsif ($self->get("startPoint") > 0) { } elsif ($self->get("startPoint") > 0) {
my $lineage = $current->get("lineage"); my $lineage = $current->get("lineage");
for (1..$self->get("startPoint")) { for (1..$self->get("startPoint")) {
$lineage .= $self->formatRank(1); $lineage .= $self->formatRank($_);
} }
$start = WebGUI::Asset->newByLineage($lineage); $start = WebGUI::Asset->newByLineage($lineage);
} }