Fixed a limit bug in the asset discovery service.

This commit is contained in:
JT Smith 2008-10-16 16:16:23 +00:00
parent 5974531eeb
commit 2b8a3c279d
3 changed files with 5 additions and 4 deletions

View file

@ -1276,10 +1276,10 @@ sub www_listAlbumsService {
my $count = 1;
for my $assetId ( @{ $self->getAlbumIds } ) {
if ($count < $pageNumber * 100 - 99) { # skip low page numbers
if ($count < $pageNumber * 100 - 100) { # skip low page numbers
next;
}
if ($count > $pageNumber * 100) { # skip high page numbers
if ($count > $pageNumber * 100 - 1) { # skip high page numbers
last;
}
my $asset = WebGUI::Asset->new( $session, $assetId, 'WebGUI::Asset::Wobject::GalleryAlbum' );