[Koha-cvs] koha/members moremember.pl

Antoine Farnault antoine at koha-fr.org
Thu Jul 12 17:32:23 CEST 2007


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 ) =





More information about the Koha-cvs mailing list