From dd33b4ae069626ed6e48f49ae02be91c46e2f44b Mon Sep 17 00:00:00 2001
From: "G. Richardson" <grichardson@kivitec.de>
Date: Mon, 2 Oct 2017 09:10:30 +0200
Subject: [PATCH] =?utf8?q?DATEV=20Export:=20invoices.t=20generate=5Fdatev?=
 =?utf8?q?=5Flines=20mit=20Encode::decode=20pr=C3=BCfen?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

---
 t/datev/invoices.t | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/t/datev/invoices.t b/t/datev/invoices.t
index a37c34c98..225af8836 100644
--- a/t/datev/invoices.t
+++ b/t/datev/invoices.t
@@ -59,10 +59,12 @@ my $datev1 = SL::DATEV->new(
   dbh        => $invoice->db->dbh,
   trans_id   => $invoice->id,
 );
+
 $datev1->generate_datev_data;
+
 cmp_bag $datev1->generate_datev_lines, [
                                          {
-                                           'belegfeld1'   => "\x{de} sales \x{a5}& inv\x{f6}ice",
+                                           'belegfeld1'   => Encode::decode('utf-8', "Þ sales ¥& invöice"),
                                            'buchungstext' => 'Testcustomer',
                                            'datum'        => '01.01.2017',
                                            'gegenkonto'   => '8400',
@@ -74,7 +76,7 @@ cmp_bag $datev1->generate_datev_lines, [
                                            'soll_haben_kennzeichen' => 'S',
                                          },
                                          {
-                                           'belegfeld1'   => "\x{de} sales \x{a5}& inv\x{f6}ice",
+                                           'belegfeld1'   => Encode::decode('utf-8', "Þ sales ¥& invöice"),
                                            'buchungstext' => 'Testcustomer',
                                            'datum'        => '01.01.2017',
                                            'gegenkonto'   => '8300',
@@ -86,7 +88,7 @@ cmp_bag $datev1->generate_datev_lines, [
                                            'soll_haben_kennzeichen' => 'S',
                                          },
                                          {
-                                           'belegfeld1'   => "\x{de} sales \x{a5}& inv\x{f6}ice",
+                                           'belegfeld1'   => Encode::decode('utf-8', "Þ sales ¥& invöice"),
                                            'buchungstext' => 'Testcustomer',
                                            'datum'        => '05.01.2017',
                                            'gegenkonto'   => '1400',
-- 
2.20.1