[otrs-cvs] CVS: otrs/Kernel/System PDF.pm,1.5,1.6

cvs-log at otrs.org cvs-log at otrs.org
Mon Aug 7 15:40:27 CEST 2006


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

Modified Files:
	PDF.pm 
Log Message:
add HeadlineLeft and HeadlineRight to PageNew()

Index: PDF.pm
===================================================================
RCS file: /home/cvs/otrs/Kernel/System/PDF.pm,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -r1.5 -r1.6
*** PDF.pm	7 Aug 2006 07:19:47 -0000	1.5
--- PDF.pm	7 Aug 2006 12:40:25 -0000	1.6
***************
*** 331,334 ****
--- 331,336 ----
          FooterLeft => 'Footer Left Text',   # (optional)
          FooterRight => 'Footer Right Text', # (optional)
+         HeadlineLeft => 'Headline Text',    # (optional)
+         HeadlineRight => 'Headline Text',   # (optional)
      );
  
***************
*** 496,506 ****
      );
  
!     # set new content dimension
!     $Self->_CurContentDimSet (
!         Top => $Printable{Top} + 34,
!         Right => $Printable{Right},
!         Bottom => $Printable{Bottom} + 16,
!         Left => $Printable{Left},
!     );
      # set activ dimension
      $Self->DimSet(
--- 498,556 ----
      );
  
!     if ($Param{HeadlineLeft} && $Param{HeadlineRight}) {
!         # set new position
!         $Self->PositionSet(
!             X => 'left',
!             Y => 'top',
!         );
!         # set new position
!         $Self->PositionSet(
!             Move => 'relativ',
!             Y => -44,
!         );
!         $Self->Text(
!             Text => $Param{HeadlineLeft},
!             Width => ($Printable{Width} / 2),
!             Height => 12,
!             Type => 'Cut',
!             Font => 'HelveticaBold',
!             FontSize => 12,
!         );
!         $Self->PositionSet(
!             X => 'left',
!             Y => 'top',
!         );
!         $Self->PositionSet(
!             Move => 'relativ',
!             X => ($Printable{Width} / 2),
!             Y => -48,
!         );
!         $Self->Text(
!             Text => $Param{HeadlineRight},
!             Height => 8,
!             Type => 'Cut',
!             Font => 'Helvetica',
!             FontSize => 8,
!             Color => '#404040',
!             Align => 'right',
!         );
!         # set new content dimension
!         $Self->_CurContentDimSet (
!             Top => $Printable{Top} + 64,
!             Right => $Printable{Right},
!             Bottom => $Printable{Bottom} + 16,
!             Left => $Printable{Left},
!         );
!     }
!     else {
!         # set new content dimension
!         $Self->_CurContentDimSet (
!             Top => $Printable{Top} + 34,
!             Right => $Printable{Right},
!             Bottom => $Printable{Bottom} + 16,
!             Left => $Printable{Left},
!         );
!     }
! 
      # set activ dimension
      $Self->DimSet(



More information about the cvs-log mailing list