From a54c939f059a151f1d9214a09acb6d4dd29bf941 Mon Sep 17 00:00:00 2001
From: hdl <hdl>
Date: Thu, 12 Jul 2007 12:47:19 +0000
Subject: [PATCH] Bug Fixing : Reserves in OPAC or in intranet lead to an
 internal server error

---
 C4/Reserves.pm | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/C4/Reserves.pm b/C4/Reserves.pm
index 2a1a820660..749db6de3f 100755
--- a/C4/Reserves.pm
+++ b/C4/Reserves.pm
@@ -287,10 +287,8 @@ sub GetReservesFromBorrowernumber {
         $sth->execute($borrowernumber);
     }
     my @borrowerreserv;
-    while ( my $data = $sth->fetchrow_hashref ) {
-        push @borrowerreserv, $data;
-    }
-    return \@borrowerreserv;
+    my $data = $sth->fetchall_arrayref({});
+    return @$data;
 }
 #-------------------------------------------------------------------------------------
 
-- 
2.20.1