OpenPKG CVS Repository
http://cvs.openpkg.org/
____________________________________________________________________________
Server: cvs.openpkg.org Name: Ralf S. Engelschall
Root: /v/openpkg/cvs Email: [EMAIL PROTECTED]
Module: openpkg-src Date: 31-Oct-2007 13:22:32
Branch: HEAD Handle: 2007103112223100
Modified files:
openpkg-src/perl-gfx perl-gfx.patch
Log:
I know, I know: it is me. Nevertheless I really hate having to first
rescue the software world everytime I want to code seomthing... so,
use the correct boolean condition for deciding whether a header or
column property is used for the cell background color in a PDF table
Summary:
Revision Changes Path
1.4 +15 -1 openpkg-src/perl-gfx/perl-gfx.patch
____________________________________________________________________________
patch -p0 <<'@@ .'
Index: openpkg-src/perl-gfx/perl-gfx.patch
============================================================================
$ cvs diff -u -r1.3 -r1.4 perl-gfx.patch
--- openpkg-src/perl-gfx/perl-gfx.patch 31 Oct 2007 10:16:01 -0000
1.3
+++ openpkg-src/perl-gfx/perl-gfx.patch 31 Oct 2007 12:22:31 -0000
1.4
@@ -86,7 +86,7 @@
}
Index: PDF-Table-0.9.3/lib/PDF/Table.pm
--- PDF-Table-0.9.3/lib/PDF/Table.pm.orig 2006-12-27 15:44:26 +0100
-+++ PDF-Table-0.9.3/lib/PDF/Table.pm 2007-10-31 11:14:06 +0100
++++ PDF-Table-0.9.3/lib/PDF/Table.pm 2007-10-31 13:20:00 +0100
@@ -384,15 +384,14 @@
# Keep a running total of the overall min and
max widths
@@ -106,6 +106,20 @@
}
}#End of for(my $j....
$row_props->[$rows_counter] = $column_widths;
+@@ -599,11 +598,11 @@
+ $background_color )
+ {
+ $gfx_bg->rect( $cur_x,
$cur_y-$row_h, $calc_column_widths->[$j], $row_h);
+- if (
$cell_props->[$row_cnt][$j]->{'background_color'} && !$first_row )
++ if (
$cell_props->[$row_cnt][$j]->{'background_color'} && !($first_row and ref
$header_props) )
+ {
+
$gfx_bg->fillcolor($cell_props->[$row_cnt][$j]->{'background_color'});
+ }
+- elsif(
$col_props->[$j]->{'background_color'} && !$first_row )
++ elsif(
$col_props->[$j]->{'background_color'} && !($first_row and ref $header_props) )
+ {
+
$gfx_bg->fillcolor($col_props->[$j]->{'background_color'});
+ }
@@ -679,12 +678,23 @@
}
@@ .
______________________________________________________________________
OpenPKG http://openpkg.org
CVS Repository Commit List openpkg-cvs@openpkg.org
