From afb7aeec6d26f62f97d45060ec7d402dc6a77658 Mon Sep 17 00:00:00 2001
From: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
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 <fridolin.somers@biblibre.com>

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
(cherry picked from commit 8e0bb409aef75ac0f18a50d3a34a749f4e87da84)
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
(cherry picked from commit 7485942b508b70039541c75a28469ca162481167)
Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de>
---
 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