From af1e7bc52686b03992b03d53649a17b6a9e78958 Mon Sep 17 00:00:00 2001 From: Moritz Bunkus Date: Fri, 15 Jun 2007 11:15:44 +0000 Subject: [PATCH] =?utf8?q?Beim=20CSV-Export=20Zeilenumbr=C3=BCche=20in=20Z?= =?utf8?q?ellendaten=20durch=20das=20ausgew=C3=A4hlte=20Format=20ersetzen.?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- SL/ReportGenerator.pm | 1 + 1 file changed, 1 insertion(+) diff --git a/SL/ReportGenerator.pm b/SL/ReportGenerator.pm index 59a878baf..87c839715 100644 --- a/SL/ReportGenerator.pm +++ b/SL/ReportGenerator.pm @@ -458,6 +458,7 @@ sub generate_csv_content { foreach my $row_set (@{ $self->{data} }) { next if ('ARRAY' ne ref $row_set); foreach my $row (@{ $row_set }) { + map { $row->{$_}->{data} =~ s/\r?\n/$eol/g } @visible_columns; $csv->print($stdout, [ map { $row->{$_}->{data} } @visible_columns ]); } } -- 2.20.1