#!/usr/bin/perl
use strict;
+#use warnings; FIXME - Bug 2505
BEGIN {
# find Koha's Perl modules
# test carefully before changing this
print "... importing MARC records -- please wait\n";
my ($num_added, $num_updated, $num_items_added, $num_items_errored, $num_ignored) =
- BatchCommitBibRecords($import_batch_id, 100, \&print_progress_and_commit);
+ BatchCommitBibRecords($import_batch_id, '', 100, \&print_progress_and_commit);
print "... finished importing MARC records\n";
print <<_SUMMARY_;