From a02f0b077752d0a686afae5aa7428c3fab1c4cd2 Mon Sep 17 00:00:00 2001
From: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
Date: Sat, 2 May 2020 15:57:16 +0200
Subject: [PATCH] Bug 24163: UTF-8 encode the output

Specify the UTF-8 charset in the header and Encode the output to avoid encoding issues

Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
---
 acqui/lateorders-export.pl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/acqui/lateorders-export.pl b/acqui/lateorders-export.pl
index 31e21a8e75..397535428c 100755
--- a/acqui/lateorders-export.pl
+++ b/acqui/lateorders-export.pl
@@ -17,6 +17,7 @@
 
 use Modern::Perl;
 use CGI qw ( -utf8 );
+use Encode;
 
 use C4::Auth;
 use C4::Acquisition;
@@ -87,7 +88,8 @@ unless ( $csv_profile_id ) {
     print $input->header(
         -type       => 'text/csv',
         -attachment => 'lateorders.csv',
+        -charset    => 'UTF-8',
     );
-    print $csv;
+    print Encode::encode_utf8($csv);
     exit;
 }
-- 
2.39.5