Bugfix for the the problem of duplicate items : the record contains biblio & items.

The biblio & the items are separated.
The bug was that the item was still in the biblio (thus being added twice : as "biblio" and as "item")

thanks to dana for pointing the bug.

diff --git a/misc/bulkmarcimport.pl b/misc/bulkmarcimport.pl
index 0cc71a2..c1410ce 100755 (executable)
--- a/misc/bulkmarcimport.pl
+++ b/misc/bulkmarcimport.pl
@@ -124,7 +124,7 @@ while ( my $record = $batch->next() ) {
                my $item = MARC::Record->new();
                $item->append_fields($field);
                push @items,$item;
-               $record->delete_field($field);
+               $newRecord->delete_field($field);
                $nbitems++;
        }
        print "$i : $nbitems items found\n" if $verbose;