Lines 679-690
sub BatchCommitRecords {
Link Here
|
679 |
} |
679 |
} |
680 |
$oldxml = $old_marc->as_xml($marc_type); |
680 |
$oldxml = $old_marc->as_xml($marc_type); |
681 |
|
681 |
|
|
|
682 |
my $context = { source => 'batchimport' }; |
683 |
if ($logged_in_patron) { |
684 |
$context->{categorycode} = $logged_in_patron->categorycode; |
685 |
$context->{userid} = $logged_in_patron->userid; |
686 |
} |
687 |
|
682 |
ModBiblio($marc_record, $recordid, $oldbiblio->frameworkcode, { |
688 |
ModBiblio($marc_record, $recordid, $oldbiblio->frameworkcode, { |
683 |
overlay_context => { |
689 |
overlay_context => $context |
684 |
source => 'batchimport', |
|
|
685 |
categorycode => $logged_in_patron->categorycode, |
686 |
userid => $logged_in_patron->userid |
687 |
}, |
688 |
}); |
690 |
}); |
689 |
$query = "UPDATE import_biblios SET matched_biblionumber = ? WHERE import_record_id = ?"; # FIXME call SetMatchedBiblionumber instead |
691 |
$query = "UPDATE import_biblios SET matched_biblionumber = ? WHERE import_record_id = ?"; # FIXME call SetMatchedBiblionumber instead |
690 |
|
692 |
|
691 |
- |
|
|