From afb7aeec6d26f62f97d45060ec7d402dc6a77658 Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Mon, 17 Jul 2017 15:58:49 -0300 Subject: [PATCH] Bug 18910: Revert "Bug 18152 : fix unimarc label in SetMarcUnicodeFlag" This reverts commit bf551a07222a7b9beffd7ca6cba38c675aa3ab28. Signed-off-by: Fridolin Somers Signed-off-by: Jonathan Druart (cherry picked from commit 8e0bb409aef75ac0f18a50d3a34a749f4e87da84) Signed-off-by: Fridolin Somers (cherry picked from commit 7485942b508b70039541c75a28469ca162481167) Signed-off-by: Katrin Fischer --- C4/Charset.pm | 1 + 1 file changed, 1 insertion(+) diff --git a/C4/Charset.pm b/C4/Charset.pm index 817682b218..1f2a8c9570 100644 --- a/C4/Charset.pm +++ b/C4/Charset.pm @@ -324,6 +324,7 @@ sub SetMarcUnicodeFlag { my $marc_record = shift; my $marc_flavour = shift; # || C4::Context->preference("marcflavour"); + $marc_record->encoding('UTF-8'); if ($marc_flavour eq 'MARC21' || $marc_flavour eq 'NORMARC') { my $leader = $marc_record->leader(); substr($leader, 9, 1) = 'a'; -- 2.39.5