[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;