[Koha-cvs] CVS: koha/C4 Reserves2.pm,1.31,1.32

Mike Hansen wolfpac444 at users.sourceforge.net
Mon May 5 13:51:23 CEST 2003


Update of /cvsroot/koha/koha/C4
In directory sc8-pr-cvs1:/tmp/cvs-serv28436/koha/C4

Modified Files:
	Reserves2.pm 
Log Message:


Index: Reserves2.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Reserves2.pm,v
retrieving revision 1.31
retrieving revision 1.32
diff -C2 -r1.31 -r1.32
*** Reserves2.pm	2 May 2003 13:07:14 -0000	1.31
--- Reserves2.pm	5 May 2003 11:51:20 -0000	1.32
***************
*** 528,533 ****
                   FROM reserves LEFT JOIN reserveconstraints
                     ON reserves.biblionumber = reserveconstraints.biblionumber
!                 WHERE reserves.biblionumber = $biblio
!                   AND ( ( reserveconstraints.biblioitemnumber = $bibitem
                        AND reserves.borrowernumber = reserveconstraints.borrowernumber
                        AND reserves.reservedate    =reserveconstraints.reservedate )
--- 528,533 ----
                   FROM reserves LEFT JOIN reserveconstraints
                     ON reserves.biblionumber = reserveconstraints.biblionumber
!                 WHERE reserves.biblionumber = ?
!                   AND ( ( reserveconstraints.biblioitemnumber = ?
                        AND reserves.borrowernumber = reserveconstraints.borrowernumber
                        AND reserves.reservedate    =reserveconstraints.reservedate )
***************
*** 536,540 ****
                    AND (reserves.found <> 'F' or reserves.found is NULL)";
    my $sth=$dbh->prepare($query);
!   $sth->execute;
    # FIXME - $i is unnecessary and bogus
    my $i=0;
--- 536,540 ----
                    AND (reserves.found <> 'F' or reserves.found is NULL)";
    my $sth=$dbh->prepare($query);
!   $sth->execute($biblio, $bibitem);
    # FIXME - $i is unnecessary and bogus
    my $i=0;





More information about the Koha-cvs mailing list