[otrs-cvs] CVS: otrs/Kernel/System PDF.pm,1.11,1.12

[cvs-log at otrs.org]

Update of /home/cvs/otrs/Kernel/System
In directory lancelot:/tmp/cvs-serv16629/Kernel/System

Modified Files:
	PDF.pm 
Log Message:
optimize output of tables (last block) over more pages

Index: PDF.pm
===================================================================
RCS file: /home/cvs/otrs/Kernel/System/PDF.pm,v
retrieving revision 1.11
retrieving revision 1.12
diff -C2 -r1.11 -r1.12
*** PDF.pm	22 Aug 2006 09:27:16 -0000	1.11
--- PDF.pm	22 Aug 2006 10:51:01 -0000	1.12
***************
*** 1839,1845 ****
          $Counter++;
      }
      my $Counter2 = 0;
      foreach my $CurBlock (@{$ColumnBlocks}) {
!         my $ExtraSpaceComplete = $Param{Width} - $CurBlock->{Width};
          my $ExtraSpaceDyn = 0;
          my $ExtraSpaceFix = 0;
--- 1839,1854 ----
          $Counter++;
      }
+     my $LastBlock = $#{$ColumnBlocks};
      my $Counter2 = 0;
      foreach my $CurBlock (@{$ColumnBlocks}) {
!         my $ExtraSpaceComplete;
!         # no extra space for laast block
!         if ($Counter2 && $Counter2 eq $LastBlock) {
!             $ExtraSpaceComplete = 0;
!         }
!         else {
!             $ExtraSpaceComplete = $Param{Width} - $CurBlock->{Width};
!         }
! 
          my $ExtraSpaceDyn = 0;
          my $ExtraSpaceFix = 0;