spellcheck.t um lenght erweitert

[kivitendo-erp.git] / SL / DATEV.pm

diff --git a/SL/DATEV.pm b/SL/DATEV.pm
index 0d6915f..00e0aa3 100644 (file)
--- a/SL/DATEV.pm
+++ b/SL/DATEV.pm
@@ -219,7 +219,7 @@ sub warnings {
   my $self = shift;
 
   if (@_) {
-    $self->{warnings} = \@_;
+    $self->{warnings} = [@_];
   } else {
    return $self->{warnings};
   }
@@ -1397,7 +1397,7 @@ sub csv_buchungsexport {
     foreach my $column (@csv_columns) {
       if (exists $column->{max_length} && $column->{kivi_datev_name} ne 'not yet implemented') {
         # check max length
-        die "Incorrect lenght of field" if length($row->{ $column->{kivi_datev_name} }) > $column->{max_length};
+        die "Incorrect length of field" if length($row->{ $column->{kivi_datev_name} }) > $column->{max_length};
       }
       if (exists $column->{valid_check} && $column->{kivi_datev_name} ne 'not yet implemented') {
         # more checks, listed as user warnings