From 41f9a3b8caaf901d2cbe05cfb60461114ffe8e3d Mon Sep 17 00:00:00 2001 From: Galen Charlton Date: Wed, 2 Aug 2017 14:39:23 -0400 Subject: [PATCH] LP#1705478: (follow-up) emit prefix subfield before call number This patch reorders the subfields so that the prefix (if present) is emitted in 852$k /before/ the call number subfield ($j); that way, MARC parsers return subfields in their order in the field (and humans) will see the components of the call number in their expected order. Signed-off-by: Galen Charlton --- Open-ILS/src/support-scripts/marc_export.in | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Open-ILS/src/support-scripts/marc_export.in b/Open-ILS/src/support-scripts/marc_export.in index 604a2ab503..d7c21d1610 100755 --- a/Open-ILS/src/support-scripts/marc_export.in +++ b/Open-ILS/src/support-scripts/marc_export.in @@ -512,8 +512,8 @@ sub next { b => Encode::decode_utf8($acp->call_number()->owning_lib()->shortname()), b => Encode::decode_utf8($acp->circ_lib()->shortname()), c => Encode::decode_utf8($acp->location()->name()), - j => Encode::decode_utf8($acp->call_number()->label()), ($prefix ? (k => Encode::decode_utf8($prefix)) : ()), + j => Encode::decode_utf8($acp->call_number()->label()), ($suffix ? (m => Encode::decode_utf8($suffix)) : ()), ($acp->circ_modifier() ? (g => Encode::decode_utf8($acp->circ_modifier())) : ()), p => Encode::decode_utf8($acp->barcode()), -- 2.11.0