From: Sven Schöling <s.schoeling@linet-services.de>
Date: Thu, 25 Feb 2016 17:54:44 +0000 (+0100)
Subject: PDF::Table: Zusätzliche header richtigrum anzeigen
X-Git-Tag: release-3.5.4~75^2~6
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=6ecf138db5fceea08d68dbcd539344797cd43939;p=kivitendo-erp.git

PDF::Table: Zusätzliche header richtigrum anzeigen
---

diff --git a/modules/override/PDF/Table.pm b/modules/override/PDF/Table.pm
index f318495d5..a805f7767 100755
--- a/modules/override/PDF/Table.pm
+++ b/modules/override/PDF/Table.pm
@@ -614,11 +614,9 @@ sub table
 
             if( ref $header_props and $header_props->{'repeat'})
             {
-                for my $idx (0 .. $header_props->{num_header_rows} - 1) {
-                  unshift @$data,           [ @{ $header_rows[$idx]      } ];
-                  unshift @$row_col_widths, [ @{ $header_row_widths[$idx] } ];
-                  unshift @$rows_height,    $header_row_heights[$idx];
-                }
+                unshift @$data,           @header_rows;
+                unshift @$row_col_widths, @header_row_widths;
+                unshift @$rows_height,    @header_row_heights;
                 $remaining_header_rows = $header_props->{num_header_rows};
                 $first_row = 1;
             }