diff options
author | Gerd Moellmann <gerd@gnu.org> | 2000-12-29 11:47:19 +0000 |
---|---|---|
committer | Gerd Moellmann <gerd@gnu.org> | 2000-12-29 11:47:19 +0000 |
commit | dc8921906b8b4d635f94ad11cbdb6f37d5e82cb1 (patch) | |
tree | 6e5c2057c5f7711259bc2d9009509a17331a970b /etc/ps-prin1.ps | |
parent | f6cab6c82f2f59fce01954cfacd1822ec7573fdc (diff) | |
download | emacs-dc8921906b8b4d635f94ad11cbdb6f37d5e82cb1.tar.gz |
Handle form feed better when ps-zebra-stripe-follow
is non-nil.
(printZebra, BeginPage): Code fix.
Diffstat (limited to 'etc/ps-prin1.ps')
-rw-r--r-- | etc/ps-prin1.ps | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/etc/ps-prin1.ps b/etc/ps-prin1.ps index 007c2e01003..4c6acf8dbe0 100644 --- a/etc/ps-prin1.ps +++ b/etc/ps-prin1.ps @@ -334,7 +334,7 @@ StandardEncoding 46 82 getinterval aload pop /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 @@ StandardEncoding 46 82 getinterval aload pop /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 |