X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=sidebyside;f=SL%2FDATEV.pm;h=00e0aa3b7e30cc3cd2e59a418d6788029961513d;hb=567eadb9b48684f980695ff08fcca79b1c985d9e;hp=0d6915f40f7479a2e6b95e2d8e5ecd13c490d5bb;hpb=9e99dce5b45847d3ebed445a277aa37ba6798173;p=kivitendo-erp.git

diff --git a/SL/DATEV.pm b/SL/DATEV.pm
index 0d6915f40..00e0aa3b7 100644
--- 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