From: Marc Chantreux <marc.chantreux@biblibre.com>
Date: Wed, 8 Oct 2008 11:05:01 +0000 (+0200)
Subject: 2663 fix
X-Git-Tag: v3.00.01.005~300
X-Git-Url: http://git.rot13.org/?a=commitdiff_plain;h=6b3cedff982ab3265e738e0b656e398fde2dd0ae;p=koha.git

2663 fix

Signed-off-by: Galen Charlton <galen.charlton@liblime.com>
---

diff --git a/opac/opac-addbybiblionumber.pl b/opac/opac-addbybiblionumber.pl
index 9fe02ee4fd..1aab972050 100755
--- a/opac/opac-addbybiblionumber.pl
+++ b/opac/opac-addbybiblionumber.pl
@@ -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};
 	}