S:DATEV:CSV: Längenbegrenzung bei buchungstext wieder rein

Flog mit
"Fixt #348 DatevExport kommt mit bestimmten Zeichen im Buchungstext nicht klar"
(commit 324726acd30b8992854a2d59fec2a50265613eef) raus.
War sicher ein Versehen.

diff --git a/SL/DATEV/CSV.pm b/SL/DATEV/CSV.pm
index 05cc309..65f6cf0 100644 (file)
--- a/SL/DATEV/CSV.pm
+++ b/SL/DATEV/CSV.pm
@@ -134,6 +134,7 @@ my @kivitendo_to_datev = (
                                                        my ($text) = @_; check_encoding($text); },
                               valid_check     => sub { return 1 if     $::instance_conf->get_datev_export_format eq 'cp1252';
                                                        my ($text) = @_; check_encoding($text); },
+                              formatter       => sub { my ($input) = @_; return substr($input, 0, 60) },
                             },  # pos 14
                             {
                               kivi_datev_name => 'not yet implemented',