[Koha-cvs] CVS: koha/acqui acquire.pl,1.6,1.7
Andrew Arensburger
arensb at users.sourceforge.net
Sun Oct 6 02:00:52 CEST 2002
Update of /cvsroot/koha/koha/acqui
In directory usw-pr-cvs1:/tmp/cvs-serv18999
Modified Files:
acquire.pl
Log Message:
Use C4::Context->preference, rather than getting all system
preferences and picking out only what's needed.
Index: acquire.pl
===================================================================
RCS file: /cvsroot/koha/koha/acqui/acquire.pl,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -r1.6 -r1.7
*** acquire.pl 5 Oct 2002 09:55:18 -0000 1.6
--- acquire.pl 6 Oct 2002 00:00:50 -0000 1.7
***************
*** 172,177 ****
;
! my %systemprefs=systemprefs();
! if ($systemprefs{'autoBarcode'} eq '1') {
my $dbh = C4::Context->dbh;
my $query="Select barcode from items order by barcode desc";
--- 172,179 ----
;
! my $auto_barcode = C4::Context->preference("autoBarcode") || 0;
! # See whether barcodes should be automatically allocated.
! # Defaults to 0, meaning "no".
! if ($auto_barcode eq '1') {
my $dbh = C4::Context->dbh;
my $query="Select barcode from items order by barcode desc";
More information about the Koha-cvs
mailing list