X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=blobdiff_plain;f=C4%2FRis.pm;h=3b39e967070214d455cc4e05f1dc0a70ebe1a140;hb=46f7239b08691a34616748db6cc10d18cc4fb16f;hp=de8dccc43c6906a0201091fd1cc6a847a39f3fb6;hpb=76c38d10d06dfcc377ab82cd312b12b8457a2dc8;p=koha-ffzg.git diff --git a/C4/Ris.pm b/C4/Ris.pm index de8dccc43c..3b39e96707 100644 --- a/C4/Ris.pm +++ b/C4/Ris.pm @@ -63,6 +63,7 @@ package C4::Ris; use Modern::Perl; use List::MoreUtils qw/uniq/; +use YAML::XS; use vars qw(@ISA @EXPORT); use Koha::SimpleMARC qw(read_field); @@ -119,7 +120,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($RisExportAdditionalFields); }; if ($@) { warn "Unable to parse RisExportAdditionalFields : $@"; $ris_additional_fields = undef;