From 0bc359145243d7f616825df11f68b3e0447c83ac Mon Sep 17 00:00:00 2001
From: toins <toins>
Date: Thu, 12 Jul 2007 15:32:23 +0000
Subject: [PATCH] bug fixing: there was a 500 error when
 GetReservesFromBorrowernumber returns an empty array.

---
 members/moremember.pl | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/members/moremember.pl b/members/moremember.pl
index 0fa672a2cc..7df572cfbb 100755
--- a/members/moremember.pl
+++ b/members/moremember.pl
@@ -251,8 +251,12 @@ if ($borrowernumber) {
     # now we show the status of the borrower's reservations
     my @borrowerreserv = GetReservesFromBorrowernumber($borrowernumber );
     my @reservloop;
+    
     foreach my $num_res (@borrowerreserv) {
+		next if not scalar @$num_res;
+    
         my %getreserv;
+        
         my $getiteminfo  = GetBiblioFromItemNumber( $num_res->{'itemnumber'} );
         my $itemtypeinfo = getitemtypeinfo( $getiteminfo->{'itemtype'} );
         my ( $transfertwhen, $transfertfrom, $transfertto ) =
-- 
2.39.5