[Koha-cvs] CVS: koha/C4/Circulation Circ2.pm,1.64,1.65

[Paul POULAIN]

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

Modified Files:
        Circ2.pm 
Log Message:
fixing compilation bugs

Index: Circ2.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Circulation/Circ2.pm,v
retrieving revision 1.64
retrieving revision 1.65
diff -C2 -r1.64 -r1.65
*** Circ2.pm    8 Dec 2003 14:08:49 -0000       1.64
--- Circ2.pm    11 Dec 2003 12:56:34 -0000      1.65
***************
*** 158,162 ****
                $sth->execute($borrowernumber);
        } elsif ($cardnumber) {
!               $sth = $dbh->$prepare("select * from borrowers where 
cardnumber=?");
                $sth->execute($cardnumber);
        } else {
--- 158,162 ----
                $sth->execute($borrowernumber);
        } elsif ($cardnumber) {
!               $sth = $dbh->prepare("select * from borrowers where 
cardnumber=?");
                $sth->execute($cardnumber);
        } else {
***************
*** 987,991 ****
                                        where (borrowernumber = ?)
                                        and (accountno=?)");
!                       
$usth->execute($amtos,$data->{'borrowernumber'},'$thisacct');
                        $usth->finish;
                        $usth = $dbh->prepare("insert into accountoffsets
--- 987,991 ----
                                        where (borrowernumber = ?)
                                        and (accountno=?)");
!                       
$usth->execute($newamtos,$data->{'borrowernumber'},'$thisacct');
                        $usth->finish;
                        $usth = $dbh->prepare("insert into accountoffsets
***************
*** 1284,1288 ****
        items.biblioitemnumber=biblioitems.biblioitemnumber and returndate is 
null
        $crit order by issues.date_due");
!       $sth->execute($borrownumber);
        while (my $data = $sth->fetchrow_hashref) {
                # FIXME - The Dewey code is a string, not a number.
--- 1284,1288 ----
        items.biblioitemnumber=biblioitems.biblioitemnumber and returndate is 
null
        $crit order by issues.date_due");
!       $sth->execute($borrowernumber);
        while (my $data = $sth->fetchrow_hashref) {
                # FIXME - The Dewey code is a string, not a number.