Revision af1e7bc5
Von Moritz Bunkus vor mehr als 17 Jahren hinzugefügt
| SL/ReportGenerator.pm | ||
|---|---|---|
| 458 | 458 |
foreach my $row_set (@{ $self->{data} }) {
|
| 459 | 459 |
next if ('ARRAY' ne ref $row_set);
|
| 460 | 460 |
foreach my $row (@{ $row_set }) {
|
| 461 |
map { $row->{$_}->{data} =~ s/\r?\n/$eol/g } @visible_columns;
|
|
| 461 | 462 |
$csv->print($stdout, [ map { $row->{$_}->{data} } @visible_columns ]);
|
| 462 | 463 |
} |
| 463 | 464 |
} |
Auch abrufbar als: Unified diff
Beim CSV-Export Zeilenumbrüche in Zellendaten durch das ausgewählte Format ersetzen.