[Koha-cvs] CVS: koha/misc fines2.pl,1.10,1.11
Paul POULAIN
tipaul at users.sourceforge.net
Thu Sep 22 12:01:48 CEST 2005
Update of /cvsroot/koha/koha/misc
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv6231/misc
Modified Files:
fines2.pl
Log Message:
see mail on koha-devel : code cleaning on Search.pm + normalizing API + use of biblionumber everywhere (instead of bn, biblio, ...)
Index: fines2.pl
===================================================================
RCS file: /cvsroot/koha/koha/misc/fines2.pl,v
retrieving revision 1.10
retrieving revision 1.11
diff -C2 -r1.10 -r1.11
*** fines2.pl 22 Dec 2003 19:16:58 -0000 1.10
--- fines2.pl 22 Sep 2005 10:01:46 -0000 1.11
***************
*** 132,136 ****
my $env;
my $accountno=C4::Circulation::Circ2::getnextacctno($env,$data->[$i]->{'borrowernumber'},$dbh);
! my $item=itemnodata($env,$dbh,$data->[$i]->{'itemnumber'});
if ($item->{'itemlost'} ne '1' && $item->{'itemlost'} ne '2' ){
# FIXME
--- 132,136 ----
my $env;
my $accountno=C4::Circulation::Circ2::getnextacctno($env,$data->[$i]->{'borrowernumber'},$dbh);
! my $item=getbibliofromitemnumber($env,$dbh,$data->[$i]->{'itemnumber'});
if ($item->{'itemlost'} ne '1' && $item->{'itemlost'} ne '2' ){
# FIXME
More information about the Koha-cvs
mailing list