[Koha-cvs] CVS: koha insertdata.pl,1.12,1.13
Mike Hansen
wolfpac444 at users.sourceforge.net
Wed Mar 26 05:10:57 CET 2003
Update of /cvsroot/koha/koha
In directory sc8-pr-cvs1:/tmp/cvs-serv9470/koha
Modified Files:
insertdata.pl
Log Message:
Index: insertdata.pl
===================================================================
RCS file: /cvsroot/koha/koha/insertdata.pl,v
retrieving revision 1.12
retrieving revision 1.13
diff -C2 -r1.12 -r1.13
*** insertdata.pl 26 Mar 2003 04:09:06 -0000 1.12
--- insertdata.pl 26 Mar 2003 04:10:55 -0000 1.13
***************
*** 52,56 ****
$sth->execute;
if (my $data=$sth->fetchrow_hashref){
! $data{'dateofbirth'}=fomat_date_in_iso($data{'dateofbirth'});
$data{'joining'}=format_date_in_iso($data{'joining'});
$query="update borrowers set title='$data{'title'}',expiry='$data{'expiry'}',
--- 52,56 ----
$sth->execute;
if (my $data=$sth->fetchrow_hashref){
! $data{'dateofbirth'}=format_date_in_iso($data{'dateofbirth'});
$data{'joining'}=format_date_in_iso($data{'joining'});
$query="update borrowers set title='$data{'title'}',expiry='$data{'expiry'}',
***************
*** 68,72 ****
}else{
! $data{'dateofbirth'}=fomat_date_in_iso($data{'dateofbirth'});
$data{'joining'}=format_date_in_iso($data{'joining'});
$query="insert into borrowers (title,expiry,cardnumber,sex,ethnotes,streetaddress,faxnumber,
--- 68,72 ----
}else{
! $data{'dateofbirth'}=format_date_in_iso($data{'dateofbirth'});
$data{'joining'}=format_date_in_iso($data{'joining'});
$query="insert into borrowers (title,expiry,cardnumber,sex,ethnotes,streetaddress,faxnumber,
More information about the Koha-cvs
mailing list