From 4e3b6d4f85f1549e2791ba725c1d004646ea94d1 Mon Sep 17 00:00:00 2001 From: Jonathan Druart 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 --- 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.20.1