[Koha-cvs] koha/cataloguing additem.pl
Chris Cormack
chris at katipo.co.nz
Wed Feb 15 04:14:54 CET 2006
CVSROOT: /sources/koha
Module name: koha
Branch:
Changes by: Chris Cormack <rangi at savannah.gnu.org> 06/02/15 03:14:53
Modified files:
cataloguing : additem.pl
Log message:
Can now add an item
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/koha/cataloguing/additem.pl.diff?tr1=1.2&tr2=1.3&r1=text&r2=text
Patches:
Index: koha/cataloguing/additem.pl
diff -u koha/cataloguing/additem.pl:1.2 koha/cataloguing/additem.pl:1.3
--- koha/cataloguing/additem.pl:1.2 Thu Jan 19 12:48:00 2006
+++ koha/cataloguing/additem.pl Wed Feb 15 03:14:53 2006
@@ -1,6 +1,6 @@
#!/usr/bin/perl
-# $Id: additem.pl,v 1.2 2006/01/19 12:48:00 tipaul Exp $
+# $Id: additem.pl,v 1.3 2006/02/15 03:14:53 rangi Exp $
# Copyright 2000-2002 Katipo Communications
#
@@ -99,7 +99,7 @@
my $exists = get_item_from_barcode($addedolditem->{'barcode'});
push @errors,"barcode_not_unique" if($exists);
# if barcode exists, don't create, but report The problem.
- $itemnumber = NEWnewitem($dbh,$addedolditem,$biblionumber,$biblioitemnumber) unless ($exists);
+ $itemnumber = NEWnewitem($dbh,$record,$biblionumber,$biblioitemnumber) unless ($exists);
$nextop = "additem";
#------------------------------------------------------------------------------------------------------------------------------
} elsif ($op eq "edititem") {
More information about the Koha-cvs
mailing list