Bug 28442: Add 21.11 release team to teams.yaml

[srvgit] / C4 / Ris.pm

diff --git a/C4/Ris.pm b/C4/Ris.pm
index de8dccc..867030c 100644 (file)
--- a/C4/Ris.pm
+++ b/C4/Ris.pm
@@ -63,6 +63,8 @@ package C4::Ris;
 use Modern::Perl;
 
 use List::MoreUtils qw/uniq/;
+use YAML::XS;
+use Encode;
 use vars qw(@ISA @EXPORT);
 
 use Koha::SimpleMARC qw(read_field);
@@ -119,7 +121,7 @@ sub marc2ris {
     my $ris_additional_fields;
     if ($RisExportAdditionalFields) {
         $RisExportAdditionalFields = "$RisExportAdditionalFields\n\n";
-        $ris_additional_fields = eval { YAML::Load($RisExportAdditionalFields); };
+        $ris_additional_fields = eval { YAML::XS::Load(Encode::encode_utf8($RisExportAdditionalFields)); };
         if ($@) {
             warn "Unable to parse RisExportAdditionalFields : $@";
             $ris_additional_fields = undef;