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>
This commit is contained in:
parent
2042cb6531
commit
a02f0b0777
|
|
@ -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;
|
||||
}
|
||||
|
|
|
|||
Loading…
Reference in New Issue