From ca3fdf186ad7a827181d382d67b6cc3596d7748b Mon Sep 17 00:00:00 2001 From: Petter Goksoyr Asen Date: Fri, 11 Jul 2014 10:54:11 +0200 Subject: [PATCH] [PASSED QA] Bug 12554: Fix GetMarcPrice for NORMARC When doing aquisitions and ordering from external z3950 targes, the item price is not inferred from the MARC record when the NORMARC framework is set. This patch makes GetMarcPrice treat NORMARC the same as MARC21. Test plan * Setup Koha with NORMARC framework * Add a norwegian z3950 search target (ex: z3950.bibsys.no:2100, database=BIBSYS) * Create a new basket, and add order to basket from external source * Search for a tile (ex: ISBN 8205341834) from the bibsys z3950 server * Click to order the title * Observe that vendor price is not set * Apply patch, repeat search for same book * Order, and observe the vendor price is filled in from the MARC record http://bugs.koha-community.org/show_bug.cgi?id=12554 Signed-off-by: Bernardo Gonzalez Kriegel Works as described. No errors. Tested changing marcflavour syspref to NORMARC, and following test plan, bug exist and is fixed. Changed bug description on patch, too long :) Signed-off-by: Katrin Fischer Patch adds a check for NORMARC to provide the same functionality as for MARC21. No regressions found. --- C4/Biblio.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/C4/Biblio.pm b/C4/Biblio.pm index f5903f3..ebf12bf 100644 --- a/C4/Biblio.pm +++ b/C4/Biblio.pm @@ -1488,7 +1488,7 @@ sub GetMarcPrice { my @listtags; my $subfield; - if ( $marcflavour eq "MARC21" ) { + if ( $marcflavour eq "MARC21" || $marcflavour eq "NORMARC" ) { @listtags = ('345', '020'); $subfield="c"; } elsif ( $marcflavour eq "UNIMARC" ) { -- 1.9.1