Mercurial > emacs
changeset 34918:3256440cb4bf
Handle form feed better when ps-zebra-stripe-follow
is non-nil.
(printZebra, BeginPage): Code fix.
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Fri, 29 Dec 2000 11:47:19 +0000 |
| parents | 989f2f0c8a7e |
| children | 2c73a20c859c |
| files | etc/ps-prin1.ps |
| diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/etc/ps-prin1.ps Fri Dec 29 06:14:42 2000 +0000 +++ b/etc/ps-prin1.ps Fri Dec 29 11:47:19 2000 +0000 @@ -334,7 +334,7 @@ /double-zebra ZebraHeight ZebraHeight add def /yiter double-zebra LineHeight mul neg def /xiter PrintWidth InterColumn add def - /zebra-line PageNumber 1 sub NumberOfColumns mul LinesPerColumn mul def + /zebra-line LinesPrinted def NumberOfColumns{LinesPerColumn doColumnZebra xiter 0 rmoveto}repeat grestore }def @@ -456,6 +456,7 @@ /PrintHeaderWidth PrintOnlyOneHeader{PrintPageWidth}{PrintWidth}ifelse def /BeginPage{ + /LinesPrinted exch def % ---- when 1st column, print all background effects ColumnIndex 1 eq{ 0 PrintStartY moveto % move to where printing will start