From 0ef063da27147dbe315a4083f29bf0926fefbe39 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Fr=C3=A9d=C3=A9ric=20Demians?= Date: Mon, 11 Jul 2022 12:05:54 +0200 Subject: [PATCH] Bug 30308 - Fix bulkmarcimport.pl broken by OAI-PMH:AutoUpdateSets(EmbedItemData) Test plan: (A) Reproduce the bug: A1 In Administration > System preferences > Web services: - Enable OAI-PMH - Enable OAI-PMH:AutoUpdateSets - Enable OAI-PMH:AutoUpdateSetsEmbedItemData A2 In Tools > Export data > Export bibliographic records, export 1 (one) biblio record. Be sure that this biblio record has at least one item. Don't tick "Don't export items". A3 Delete the exported biblio record, and its items. A4 In command line, on the server load the exported file: ./bulkmarcimport.pl -b -v -file /path/to/koha.mrc A5 Retrieve the biblio record in Koha. Note the absence of the item(s). This is the bug. (B) Apply the patch B1 Delete the record (without item) loaded at A4. B2 In command line, on the server load the exported file: ./bulkmarcimport.pl -b -v -file /path/to/koha.mrc B2 Retrieve the biblio record in Koha. Note the presence of the item(s). Signed-off-by: David Nind --- C4/OAI/Sets.pm | 1 + 1 file changed, 1 insertion(+) diff --git a/C4/OAI/Sets.pm b/C4/OAI/Sets.pm index ac9eb22dce..23871ce0a5 100644 --- a/C4/OAI/Sets.pm +++ b/C4/OAI/Sets.pm @@ -609,6 +609,7 @@ sub UpdateOAISetsBiblio { return unless($biblionumber and $record); + $record = $record->clone; if (C4::Context->preference('OAI-PMH:AutoUpdateSetsEmbedItemData')) { C4::Biblio::EmbedItemsInMarcBiblio({ marc_record => $record, -- 2.30.2