components/enscript/patches/enscript-wrap_header.patch
changeset 1132 a62391631ea1
child 6638 c7defa3ae9cc
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/components/enscript/patches/enscript-wrap_header.patch	Wed Jan 23 12:17:32 2013 -0800
@@ -0,0 +1,121 @@
+--- enscript-1.6.1/lib/simple.hdr.wrap_header	1997-03-03 09:00:08.000000000 +0100
++++ enscript-1.6.1/lib/simple.hdr	2007-02-12 12:57:02.000000000 +0100
+@@ -1,50 +1,68 @@
+-% 
+-% Default simple header.
+-% Copyright (c) 1995 Markku Rossi.
+-% Author: Markku Rossi <[email protected]>
+-%
+-
+-%
+-% This file is part of GNU enscript.
+-% 
+-% This program is free software; you can redistribute it and/or modify
+-% it under the terms of the GNU General Public License as published by
+-% the Free Software Foundation; either version 2, or (at your option)
+-% any later version.
+-%
+-% This program is distributed in the hope that it will be useful,
+-% but WITHOUT ANY WARRANTY; without even the implied warranty of
+-% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+-% GNU General Public License for more details.
+-%
+-% You should have received a copy of the GNU General Public License
+-% along with this program; see the file COPYING.  If not, write to
+-% the Free Software Foundation, 59 Temple Place - Suite 330,
+-% Boston, MA 02111-1307, USA.
+-%
+-
+-% -- code follows this line --
+-%Format: fmodstr	$D{%a %b %d %H:%M:%S %Y}
+-%Format: pagenumstr	$V$%
+-
+-/do_header {	% print default simple header
+-  gsave
+-    d_header_x d_header_y HFpt_h 3 div add translate
+-
+-    HF setfont
+-    user_header_p {
+-      5 0 moveto user_header_left_str show
+-
+-      d_header_w user_header_center_str stringwidth pop sub 2 div
+-      0 moveto user_header_center_str show
+-
+-      d_header_w user_header_right_str stringwidth pop sub 5 sub
+-      0 moveto user_header_right_str show
+-    } {
+-      5 0 moveto fname show
+-      45 0 rmoveto fmodstr show
+-      45 0 rmoveto pagenumstr show
+-    } ifelse
+-
+-  grestore
+-} def
++% 
++% Default simple header.
++% Copyright (c) 1995 Markku Rossi.
++% Author: Markku Rossi <[email protected]>
++%
++% Modified: Chris Josefy, USA, MAY 2006
++%  + Added line wrapping to header to work more like AIX enscript
++%  + This assumes that one does not change the header font size from the default
++%  + This also assumes that the line only wraps once
++
++%
++% This file is part of GNU enscript.
++% 
++% This program is free software; you can redistribute it and/or modify
++% it under the terms of the GNU General Public License as published by
++% the Free Software Foundation; either version 2, or (at your option)
++% any later version.
++%
++% This program is distributed in the hope that it will be useful,
++% but WITHOUT ANY WARRANTY; without even the implied warranty of
++% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
++% GNU General Public License for more details.
++%
++% You should have received a copy of the GNU General Public License
++% along with this program; see the file COPYING.  If not, write to
++% the Free Software Foundation, 59 Temple Place - Suite 330,
++% Boston, MA 02111-1307, USA.
++%
++
++% -- code follows this line --
++%Format: fmodstr	$D{%a %b %d %H:%M:%S %Y}
++%Format: pagenumstr	$V$%
++%HeaderHeight: 44
++
++/do_header {	% print default simple header
++  gsave
++    d_header_x d_header_y HFpt_h 3 div add translate
++
++    HF setfont
++    user_header_p {
++      5 0 moveto user_header_left_str show
++
++      d_header_w user_header_center_str stringwidth pop sub 2 div
++      0 moveto user_header_center_str show
++
++      d_header_w user_header_right_str stringwidth pop sub 5 sub
++      0 moveto user_header_right_str show
++    } {
++      fname length fmodstr length add pagenumstr length add 95 6 idiv add d_header_w 6 idiv le{
++        5 0 moveto fname show
++        45 0 rmoveto fmodstr show
++        45 0 rmoveto pagenumstr show
++      } {
++        5 0 moveto fmodstr show
++        45 0 rmoveto pagenumstr show
++        fname length d_header_w 6 idiv idiv 1 add 10 mul 5 exch moveto
++        1 1 fname length d_header_w 6 idiv idiv
++        {
++          dup fname exch 1 sub d_header_w 6 idiv mul d_header_w 6 idiv getinterval show
++          5 exch 10 mul fname length d_header_w 6 idiv idiv 1 add 10 mul exch sub moveto
++        } for
++        5 10 moveto
++        fname fname length d_header_w 6 idiv idiv d_header_w 6 idiv mul dup fname length exch sub getinterval show
++      }ifelse
++    }ifelse
++
++  grestore
++} def