[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] CVS: koha/C4 Biblio.pm,1.72,1.73
From: |
Paul POULAIN |
Subject: |
[Koha-cvs] CVS: koha/C4 Biblio.pm,1.72,1.73 |
Date: |
Fri, 28 Nov 2003 01:45:32 -0800 |
Update of /cvsroot/koha/koha/C4
In directory sc8-pr-cvs1:/tmp/cvs-serv5384/C4
Modified Files:
Biblio.pm
Log Message:
bugfix for iso2709 file import in the "notforloan" field.
But notforloan field called "loan" somewhere, so in case "loan" is used, copied
to "notforloan" to avoid a bug.
Index: Biblio.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Biblio.pm,v
retrieving revision 1.72
retrieving revision 1.73
diff -C2 -r1.72 -r1.73
*** Biblio.pm 24 Nov 2003 17:40:14 -0000 1.72
--- Biblio.pm 28 Nov 2003 09:45:25 -0000 1.73
***************
*** 1437,1440 ****
--- 1437,1444 ----
$itemnumber = $data->{'max(itemnumber)'} + 1;
$sth->finish;
+ # FIXME the "notforloan" field seems to be named "loan" in some places.
workaround bugfix.
+ if ($item->{'loan'}) {
+ $item->{'notforloan'} = $item->{'loan'};
+ }
# if dateaccessioned is provided, use it. Otherwise, set to NOW()
if ($item->{'dateaccessioned'}) {
***************
*** 1453,1457 ****
$item->{'homebranch'},$item->{'holdingbranch'},
$item->{'price'},$item->{'replacementprice'},
!
$item->{'itemnotes'},$item->{'loan'});
} else {
$sth=$dbh->prepare("Insert into items set
--- 1457,1461 ----
$item->{'homebranch'},$item->{'holdingbranch'},
$item->{'price'},$item->{'replacementprice'},
!
$item->{'itemnotes'},$item->{'notforloan'});
} else {
$sth=$dbh->prepare("Insert into items set
***************
*** 1469,1473 ****
$item->{'homebranch'},$item->{'holdingbranch'},
$item->{'price'},$item->{'replacementprice'},
!
$item->{'itemnotes'},$item->{'loan'});
}
if (defined $sth->errstr) {
--- 1473,1477 ----
$item->{'homebranch'},$item->{'holdingbranch'},
$item->{'price'},$item->{'replacementprice'},
!
$item->{'itemnotes'},$item->{'notforloan'});
}
if (defined $sth->errstr) {
***************
*** 2214,2217 ****
--- 2218,2226 ----
# $Id$
# $Log$
+ # Revision 1.73 2003/11/28 09:45:25 tipaul
+ # bugfix for iso2709 file import in the "notforloan" field.
+ #
+ # But notforloan field called "loan" somewhere, so in case "loan" is used,
copied to "notforloan" to avoid a bug.
+ #
# Revision 1.72 2003/11/24 17:40:14 tipaul
# fix for #385
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha/C4 Biblio.pm,1.72,1.73,
Paul POULAIN <=