[Koha-cvs] koha/misc/migration_tools bulkmarcimport.pl [dev_week]
Joshua Ferraro
jmf at kados.org
Mon Oct 23 16:16:56 CEST 2006
CVSROOT: /sources/koha
Module name: koha
Branch: dev_week
Changes by: Joshua Ferraro <kados> 06/10/23 14:16:56
Modified files:
misc/migration_tools: bulkmarcimport.pl
Log message:
updating to new Biblio API
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/misc/migration_tools/bulkmarcimport.pl?cvsroot=koha&only_with_tag=dev_week&r1=1.1.2.4&r2=1.1.2.4.2.1
Patches:
Index: bulkmarcimport.pl
===================================================================
RCS file: /sources/koha/koha/misc/migration_tools/bulkmarcimport.pl,v
retrieving revision 1.1.2.4
retrieving revision 1.1.2.4.2.1
diff -u -b -r1.1.2.4 -r1.1.2.4.2.1
--- bulkmarcimport.pl 26 Apr 2006 11:48:46 -0000 1.1.2.4
+++ bulkmarcimport.pl 23 Oct 2006 14:16:56 -0000 1.1.2.4.2.1
@@ -289,10 +289,10 @@
print "$i : $nbitems items found\n" if $verbose;
# now, create biblio and items with NEWnewXX call.
unless ($test_parameter) {
- my ($bibid,$oldbibnum,$oldbibitemnum) = NEWnewbiblio($dbh,$newRecord,'');
+ my ($bibid,$oldbibnum,$oldbibitemnum) = AddBiblio($dbh,$newRecord,'');
warn "ADDED biblio NB $bibid in DB\n" if $verbose;
for (my $i=0;$i<=$#items;$i++) {
- NEWnewitem($dbh,$items[$i],$bibid);
+ AddItem($dbh,$items[$i],$bibid);
}
}
}
More information about the Koha-cvs
mailing list