From 66bded690ce4d9ea1aef97ed11c3c0868147b7fa Mon Sep 17 00:00:00 2001 From: Jared Camins-Esakov Date: Fri, 6 Jul 2012 07:05:27 -0400 Subject: [PATCH] Bug 8203 follow-up: fix MARCXML export for UNIMARC Content-Type: text/plain; charset="UTF-8" --- authorities/export.pl | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/authorities/export.pl b/authorities/export.pl index c6b8349..9c8ae17 100755 --- a/authorities/export.pl +++ b/authorities/export.pl @@ -30,7 +30,7 @@ if ( $op eq "export" ) { my $marc = GetAuthority($authid); if ( $format =~ /marcxml/ ) { - $marc = marc2marcxml($marc); + $marc = marc2marcxml($marc, 'UTF-8', C4::Context->preference("marcflavour") eq 'UNIMARC' ? 'UNIMARCAUTH' : 'MARC21' ); } elsif ($format=~ /mads/) { $marc = marc2madsxml($marc); -- 1.7.2.5