X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/e7377248c81173d4da61913bc6e8e0a2eefb0891..4b60ea349ac6b7c005456d6f2053c0518f1d146e:/t/helper/csv.t

diff --git a/t/helper/csv.t b/t/helper/csv.t
index 3a8556cfd..bab3825df 100644
--- a/t/helper/csv.t
+++ b/t/helper/csv.t
@@ -552,7 +552,7 @@ ok !$csv->_check_multiplexed, 'multiplex check detects empty header';
 #####
 
 $csv = SL::Helper::Csv->new(
-  file   => \<<EOL,
+  file   => \ Encode::encode('utf-8', <<EOL),
 description;longdescription;datatype
 name;customernumber;datatype
 Kaffee;"lecker Kaffee";P
@@ -580,7 +580,7 @@ is_deeply $csv->get_data, [ { datatype => 'P', description => 'Kaffee', longdesc
 #####
 
 $csv = SL::Helper::Csv->new(
-  file   => \<<EOL,
+  file   => \ Encode::encode('utf-8', <<EOL),
 datatype;description;longdescription
 name;datatype;customernumber
 P;Kaffee;"lecker Kaffee"