View | Details | Raw Unified | Return to bug 5635
Collapse All | Expand All

(-)a/misc/migration_tools/bulkmarcimport.pl (-4 / +1 lines)
Lines 84-90 if ($version || ($input_marc_file eq '')) { Link Here
84
    pod2usage( -verbose => 2 );
84
    pod2usage( -verbose => 2 );
85
    exit;
85
    exit;
86
}
86
}
87
87
my $dbh = C4::Context->dbh;
88
my $heading_fields=get_heading_fields();
88
my $heading_fields=get_heading_fields();
89
89
90
if (defined $idmapfl) {
90
if (defined $idmapfl) {
Lines 96-103 if ((not defined $sourcesubfield) && (not defined $sourcetag)){ Link Here
96
  $sourcesubfield="a";
96
  $sourcesubfield="a";
97
}
97
}
98
98
99
my $dbh = C4::Context->dbh;
100
101
# save the CataloguingLog property : we don't want to log a bulkmarcimport. It will slow the import & 
99
# save the CataloguingLog property : we don't want to log a bulkmarcimport. It will slow the import & 
102
# will create problems in the action_logs table, that can't handle more than 1 entry per second per user.
100
# will create problems in the action_logs table, that can't handle more than 1 entry per second per user.
103
my $CataloguingLog = C4::Context->preference('CataloguingLog');
101
my $CataloguingLog = C4::Context->preference('CataloguingLog');
104
- 

Return to bug 5635