Bug 7295 (follow-up) replace simple-quoted string by double-quoted string

[koha.git] / authorities / export.pl

diff --git a/authorities/export.pl b/authorities/export.pl
index c6b8349..dc886c0 100755 (executable)
--- a/authorities/export.pl
+++ b/authorities/export.pl
@@ -15,7 +15,7 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
         query           => $query,
         type            => "intranet",
         authnotrequired => 0,
-        flagsrequired   => { editauthorities => 1 },
+        flagsrequired   => { catalogue => 1 },
         debug           => 1,
     }
 );
@@ -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);