[Koha-cvs] koha/members moremember.pl

[Antoine Farnault]

CVSROOT:        /sources/koha
Module name:    koha
Changes by:     Antoine Farnault <toins>        07/07/12 15:32:23

Modified files:
        members        : moremember.pl 

Log message:
        bug fixing: there was a 500 error when GetReservesFromBorrowernumber 
returns an empty array.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/members/moremember.pl?cvsroot=koha&r1=1.40&r2=1.41

Patches:
Index: moremember.pl
===================================================================
RCS file: /sources/koha/koha/members/moremember.pl,v
retrieving revision 1.40
retrieving revision 1.41
diff -u -b -r1.40 -r1.41
--- moremember.pl       24 Apr 2007 16:10:36 -0000      1.40
+++ moremember.pl       12 Jul 2007 15:32:23 -0000      1.41
@@ -17,7 +17,7 @@
 # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place,
 # Suite 330, Boston, MA  02111-1307 USA
 
-# $Id: moremember.pl,v 1.40 2007/04/24 16:10:36 tipaul Exp $
+# $Id: moremember.pl,v 1.41 2007/07/12 15:32:23 toins Exp $
 
 =head1 moremember.pl
 
@@ -251,8 +251,12 @@
     # 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 ) =