[Koha-cvs] CVS: koha insertidata.pl,1.4,1.5

[Paul POULAIN]

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

Modified Files:
        insertidata.pl 
Log Message:
fir for #208 + bugfix in adding an organisation

Index: insertidata.pl
===================================================================
RCS file: /cvsroot/koha/koha/insertidata.pl,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -r1.4 -r1.5
*** insertidata.pl      15 May 2003 12:25:04 -0000      1.4
--- insertidata.pl      6 Jun 2003 10:00:52 -0000       1.5
***************
*** 74,82 ****
        
'$data{'phoneday'}','I','$data{'city'}','$data{'area'}','$data{'phone'}',
        
'$data{'borrowernotes'}','$data{'altphone'}','$surname','$data{'initials'}',
!       
'$data{'ethnicity'}','$data{'borrowernumber'}','','',$data{'branchcode'},$data{'zipcode'},$data{'homezipcode'})";
  }
  
  #print $query;
  my $sth2=$dbh->prepare($query);
  $sth2->execute;
  $sth2->finish;
--- 74,83 ----
        
'$data{'phoneday'}','I','$data{'city'}','$data{'area'}','$data{'phone'}',
        
'$data{'borrowernotes'}','$data{'altphone'}','$surname','$data{'initials'}',
!       
'$data{'ethnicity'}','$data{'borrowernumber'}','','','$data{'branchcode'}','$data{'zipcode'}','$data{'homezipcode'}')";
  }
  
  #print $query;
  my $sth2=$dbh->prepare($query);
+ warn "==> $query";
  $sth2->execute;
  $sth2->finish;