$datev1->to($enddate);
$datev1->csv_buchungsexport();
my @warnings = $datev1->warnings;
-is(@warnings[0]->[0]->{untranslated},
+is($warnings[0]->[0]->{untranslated},
'Wrong field value \'#1\' for field \'#2\' for the transaction with amount \'#3\'', 'wrong_encoding');
$datev3->csv_buchungsexport;
@warnings = [];
@warnings = $datev3->warnings;
-is(@warnings[0]->[0]->{untranslated},
+is($warnings[0]->[0]->{untranslated},
'Wrong field value \'#1\' for field \'#2\' for the transaction with amount \'#3\'', 'mixed_wrong_encoding');
sub clear_up {
SL::DB::Manager::AccTransaction->delete_all( all => 1);
+ SL::DB::Manager::GLTransaction->delete_all( all => 1);
SL::DB::Manager::InvoiceItem->delete_all( all => 1);
SL::DB::Manager::Invoice->delete_all( all => 1);
SL::DB::Manager::Customer->delete_all( all => 1);