Bugfix: Reportgenerator csv_export hatte einen Fehler der sctrict zutage getreten...

diff --git a/SL/ReportGenerator.pm b/SL/ReportGenerator.pm
index 402f89d434709e02623ff3101c4437de222ce583..b90b65529f36f84f9946245a19fd8de9746cfbb5 100644 (file)
--- a/SL/ReportGenerator.pm
+++ b/SL/ReportGenerator.pm
@@ -761,7 +761,7 @@ sub generate_csv_content {
           next;
         }
 
           next;
         }
 

-        my $num_output = ($col->{colspan} && ($col->{colspan} > 1)) ? $col->{colspan} : 1;
+        my $num_output = ($row->{$col}{colspan} && ($row->{$col}->{colspan} > 1)) ? $row->{$col}->{colspan} : 1;

         $skip_next     = $num_output - 1;
 
         push @data, join($eol, map { s/\r?\n/$eol/g; $_ } @{ $row->{$col}->{data} });
         $skip_next     = $num_output - 1;
 
         push @data, join($eol, map { s/\r?\n/$eol/g; $_ } @{ $row->{$col}->{data} });