[Koha-cvs] CVS: koha insertjdata.pl,1.6,1.6.2.1

[Chris Cormack]

Update of /cvsroot/koha/koha
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv5132

Modified Files:
      Tag: rel_2_0
        insertjdata.pl 
Log Message:
fix for bug 729


Index: insertjdata.pl
===================================================================
RCS file: /cvsroot/koha/koha/Attic/insertjdata.pl,v
retrieving revision 1.6
retrieving revision 1.6.2.1
diff -C2 -r1.6 -r1.6.2.1
*** insertjdata.pl      27 May 2003 07:09:07 -0000      1.6
--- insertjdata.pl      28 Apr 2004 09:34:51 -0000      1.6.2.1
***************
*** 46,52 ****
  my $query;
  for (my $i=0;$i<1;$i++){
-       my $x = "cardnumber_child_$i";
        my $sth=$dbh->prepare("Select * from borrowers where borrowernumber=?");
!       $sth->execute($x);
        if (my $data=$sth->fetchrow_hashref){
                $query="update borrowers set 
title='$data{'title'}',expiry='$data{'expiry'}',
--- 46,51 ----
  my $query;
  for (my $i=0;$i<1;$i++){
        my $sth=$dbh->prepare("Select * from borrowers where borrowernumber=?");
!       $sth->execute($data{'bornumber_child_$i'});
        if (my $data=$sth->fetchrow_hashref){
                $query="update borrowers set 
title='$data{'title'}',expiry='$data{'expiry'}',