[Koha-patches] [PATCH] Bug Fixing : 3699

[henridamien.laurent at biblibre.com]

From: Henri-Damien LAURENT <henridamien.laurent at biblibre.com>

 C4::Charset source_encoding always set to iso-8859-1
---
 C4/Charset.pm |    3 +--
 1 files changed, 1 insertions(+), 2 deletions(-)

diff --git a/C4/Charset.pm b/C4/Charset.pm
index bffd374..655d6c7 100644
--- a/C4/Charset.pm
+++ b/C4/Charset.pm
@@ -139,7 +139,6 @@ sub MarcToUTF8Record {
     my $marc = shift;
     my $marc_flavour = shift;
     my $source_encoding = shift;
-
     my $marc_record;
     my $marc_blob_is_utf8 = 0;
     if (ref($marc) eq 'MARC::Record') {
@@ -216,7 +215,7 @@ sub MarcToUTF8Record {
             @errors = _marc_iso5426_to_utf8($marc_record, $marc_flavour);
         } else {
             # assume any other character encoding is for Text::Iconv
-            @errors = _marc_to_utf8_via_text_iconv($marc_record, $marc_flavour, 'iso-8859-1');
+            @errors = _marc_to_utf8_via_text_iconv($marc_record, $marc_flavour, $source_encoding);
         }
 
         if (@errors) {
-- 
1.6.0.4