From: Sven Schöling Date: Thu, 25 Feb 2016 17:59:45 +0000 (+0100) Subject: PDF::Table: Warnungen und "-" Artefakte bei undef entfernt X-Git-Tag: release-3.4.1~392 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=a864ef272897c875c8be4af5c09870d03d9ec712;p=kivitendo-erp.git PDF::Table: Warnungen und "-" Artefakte bei undef entfernt --- diff --git a/modules/override/PDF/Table.pm b/modules/override/PDF/Table.pm index 7ebe16fa4..1b7917b29 100644 --- a/modules/override/PDF/Table.pm +++ b/modules/override/PDF/Table.pm @@ -129,8 +129,8 @@ sub text_block # Check if any text to display unless( defined( $text) and length($text) > 0 ) { - carp "Warning: No input text found. Trying to add dummy '-' and not to break everything.\n"; - $text = '-'; +# carp "Warning: No input text found. Trying to add dummy '-' and not to break everything.\n"; + $text = ' '; } # Strip any and Split the text into paragraphs @@ -648,7 +648,7 @@ sub table # Added to resolve infite loop bug with returned undef values for(my $d = 0; $d < scalar(@{$record}) ; $d++) { - $record->[$d] = '-' unless( defined $record->[$d]); + $record->[$d] = ' ' unless( defined $record->[$d]); } # Choose colors for this row