From be84313af3fa99f2f5c4bf0c962a9552cee68a6e Mon Sep 17 00:00:00 2001 From: Janusz Kaczmarek Date: Fri, 31 Jan 2014 16:12:10 +0100 Subject: [PATCH] Bug 11652: merging authority records does not correct biblios When merging authority records in librarian interface biblio records linked to deleted authority are not being corrected (i.e. have still old heading and orpaned link in $9). Test plan: 1. Have two authorities in the catalogue, linked to biblio records. 2. Merge them with the new merge facility (cf. Bug 5202). 3. Have a look a the biblio record(s) previously linked to the removed authority. It should still have the old heading AND orpaned authority link in $9. 4. Apply the patch. 5. Refresh the test records (or use another set). 6. Repeat 1-3. Headings should be refreshed and the correct authid link should be in $9 now. --- authorities/merge.pl | 1 + 1 files changed, 1 insertions(+), 0 deletions(-) diff --git a/authorities/merge.pl b/authorities/merge.pl index 315e232..3628381 100755 --- a/authorities/merge.pl +++ b/authorities/merge.pl @@ -68,6 +68,7 @@ if ($merge) { require C4::ImportBatch; C4::ImportBatch::SetImportRecordStatus( $recordid2, 'imported' ); } else { + C4::AuthoritiesMarc::merge( $recordid2, GetAuthority($recordid2), $recordid1, $record ); $error = (DelAuthority($recordid2) == 0); } push @errors, $error if ($error); -- 1.7.2.5