From 969fc342452c5df14e5c50b0df14fb884f83590f Mon Sep 17 00:00:00 2001 From: =?utf8?q?Sven=20Sch=C3=B6ling?= Date: Tue, 27 Apr 2010 18:28:20 +0200 Subject: [PATCH] Strict fix im Reportgenerator --- SL/ReportGenerator.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/SL/ReportGenerator.pm b/SL/ReportGenerator.pm index b90b65529..e23bf7786 100644 --- a/SL/ReportGenerator.pm +++ b/SL/ReportGenerator.pm @@ -512,7 +512,7 @@ sub generate_pdf_content { my $col_idx = 0; foreach my $col_name (@visible_columns) { my $col = $row->{$col_name}; - push @{ $data_row }, $self->_decode_text(join("\n", @{ $col->{data} })); + push @{ $data_row }, $self->_decode_text(join("\n", @{ $col->{data} || [] })); $column_props[$col_idx]->{justify} = 'right' if ($col->{align} eq 'right'); -- 2.20.1