Signed-off-by: Galen Charlton <galen.charlton@liblime.com>
This commit is contained in:
Marc Chantreux 2008-10-08 13:05:01 +02:00 committed by Henri-Damien LAURENT
parent a7beaebee2
commit 6b3cedff98
1 changed files with 2 additions and 2 deletions

View File

@ -95,13 +95,13 @@ else {
my ($shelflist) = GetRecentShelves(1, $limit, $loggedinuser);
my @shelvesloop;
my %shelvesloop;
for my $shelf ( @{${@$shelflist}[0]} ) {
for my $shelf ( @{ $shelflist->[0] } ) {
push( @shelvesloop, $shelf->{shelfnumber} );
$shelvesloop{$shelf->{shelfnumber}} = $shelf->{shelfname};
}
# then open shelves...
my ($shelflist) = GetRecentShelves(3, $limit, undef);
for my $shelf ( @{${@$shelflist}[0]} ) {
for my $shelf ( @{ $shelflist->[0] } ) {
push( @shelvesloop, $shelf->{shelfnumber} );
$shelvesloop{$shelf->{shelfnumber}} = $shelf->{shelfname};
}