---
virtualshelves/addbybiblionumber.pl | 4 ++--
1 files changed, 2 insertions(+), 2 deletions(-)
diff --git a/virtualshelves/addbybiblionumber.pl
b/virtualshelves/addbybiblionumber.pl
index 2c7600b..b19e7da 100755
--- a/virtualshelves/addbybiblionumber.pl
+++ b/virtualshelves/addbybiblionumber.pl
@@ -98,13 +98,13 @@ else { # this shelf doesn't already exist.
my ($shelflist) = GetRecentShelves(1, $limit, $loggedinuser);
my @shelvesloop;
my %shelvesloop;
- for my $shelf ( @[EMAIL PROTECTED] ) {
+ 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 ( @[EMAIL PROTECTED] ) {
+ for my $shelf ( @{ $shelflist->[0] } ) {
push( @shelvesloop, $shelf->{shelfnumber} );
$shelvesloop{$shelf->{shelfnumber}} = $shelf->{shelfname};
}
--
1.5.6.3
_______________________________________________
Koha-patches mailing list
[email protected]
http://lists.koha.org/mailman/listinfo/koha-patches
