From: Moritz Bunkus Date: Thu, 21 Jun 2007 14:14:49 +0000 (+0000) Subject: ReportGenerator: Man kann jetzt die Standardanordnung (align) in den Spalten angegebe... X-Git-Tag: release-2.4.3^2~79 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=dba493ac8d5e53b863d59fa25d3b9d2de396b027;p=kivitendo-erp.git ReportGenerator: Man kann jetzt die Standardanordnung (align) in den Spalten angegeben werden. --- diff --git a/SL/ReportGenerator.pm b/SL/ReportGenerator.pm index 281000602..cdcf18fab 100644 --- a/SL/ReportGenerator.pm +++ b/SL/ReportGenerator.pm @@ -107,7 +107,14 @@ sub add_data { $self->{form}->error('Incorrect usage -- expecting hash or array ref'); } + my @columns_with_default_alignment = grep { defined $self->{columns}->{$_}->{align} } keys %{ $self->{columns} }; + foreach my $row (@{ $row_set }) { + foreach my $column (@columns_with_default_alignment) { + $row->{$column} ||= { }; + $row->{$column}->{align} = $self->{columns}->{$column}->{align} unless (defined $row->{$column}->{align}); + } + foreach my $field (qw(data link)) { map { $row->{$_}->{$field} = [ $row->{$_}->{$field} ] if (ref $row->{$_}->{$field} ne 'ARRAY') } keys %{ $row }; }