*** empty log message ***

This commit is contained in:
Matthew Wilson 2005-08-25 14:06:38 +00:00
parent b8fc95d5bd
commit b8d8e9cb01
2 changed files with 3 additions and 3 deletions

View file

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

View file

@ -165,7 +165,7 @@ Creates a series of hidden fields representing the data in the list.
sub toHtmlAsHidden {
my $self = shift;
return WebGUI::Form::hiddenList->new(
return WebGUI::Form::HiddenList->new(
value=>$self->{value},
defaultValue=>$self->{defaultValue},
name=>$self->{name},